Program test;
uses graphabc;
var i,x:integer;
begin write('Сколько досок для забора тебе нужно? = ');
readln(x);
for i:=1 to x do begin
line(50+i*50,400,50+i*50,200);
line(50+i*50,200,75+i*50,190);
line(75+i*50,190,100+i*50,200);
line(100+i*50,200,100+i*50,400);
line(100+i*50,400,50+i*50,400);
end;
end.
1)
<span>A = int(input("A = "))
B = int(input("B = "))
suma = <span>0
</span>if A > B:
----for x in range(B,A+1):
----print(x)
----suma += x
print("Сума всех",suma)
2)
</span><span>n = int(input('n = '))
if n <= 9:
----for i in range(n):
--------for j in range(1, i + 2):
------------print(j, end='')
--------print()</span>
Program Mila37;
var b, m, s, f:integer;
begin
writeln('*******************************');
writeln('* ПРИЁМНАЯ КОМИССИЯ *');
writeln('*******************************');
writeln;
write('введите проходной балл');
readln(b);
write('введите оценку по математике ');
readln(m);
write('введите оценку за сочинение ');
readln(s);
write('введите оценку по физике ');
readln(f);
if m+s+f<b then
begin
writeln('К сожалению, Вы не поступили...');
writeln('Попробуйте снова через год.');
end
else
begin
writeln('Поздравляем!!! Вы поступили ');
writeln(' и зачаслены на I-й курс');
end;
end.
Чаще всего параллельные порты LPT используются для подключения к компьютеру печатающих устройств (принтеры).
Параллельные порты получили свое название благодаря методу передачи данных, т.к. они имеют восемь разрядов шины данных и способны передавать информацию байтами синхронно по восьми проводникам.
Сигналы данных могут дополнительно обеспечиваться собственными сигнальными линиями заземления — по одному на каждый канал данных. В таком случае, число сигналов возрастает до 25. Для соединения компьютера с устройством при помощи параллельного интерфейса используется 25-ти контактный разъем Centronics.
Параллельные интерфейсы имеют высокую скорость передачи данных (до 150 К/сек) и низкую помехоустойчивость, что позволяет использовать кабель длинною не более трех метров.
При переводе из десятично системы счисления мы делим на цифру системы счисления в которую переводим.
При переводе из двоичной в 16-ую мы отделяем по четыре числа начиная справа,далее мы смотрим по готовой таблице какие числа. В 8-ую тоже самое только отделяем по 3 цифры.
Вот если что таблица по которой мы переводим:
0-0000
1-0001
2-0010
3-0011
4-0100
5-0101
6-0110
7-0111
8-1000
9-1001
10-1010 A
11-1011 B
12-1100 C
13-1101 D
14-1110 E
15-1111 F
Ну и при переводе из 16-ой в 2-ую мы так же смотрим на таблицу.
При переводе в 10-ую СС мы в верхнем регистре выставляем разряды и слева на права умножаем цифру на систему счисоения водведенную в степень выставленого регистра.