Данные в компьютерное сети передаются через Паскали ,это позволяет увеличить скорость браузера и избавится от так называемых "рачков"-это вредоносные программы,заполняющие сеть ненужным контентом.
A. 1 --- 00012 --- 00103 --- 00114 --- 01005 --- 01016 --- 01107 --- 01118 --- 10009 --- 100110 --- 1010b. 1011 --- 111100 --- 121101 --- 13
1110 --- 14
1111 --- 1510000 --- 1610001 --- 1710010 --- 1810011 --- 1910100 --- 20с. - у какого числа двоичный код --- 10101? --- 21каков двоичный код числа 23? --- 10111d. 32 --- 10000064 --- 1000000
//Pascal ABC.NET 3.1 сборка 1219
Var
x1,x2,x3,y1,y2,y3:integer;
p1,p2:real;
begin
readln(x1,y1,x2,y2,x3,y3);
p1:=(y3-y1)/(y2-y1);
p2:=(x3-x1)/(x2-x1);
if p1=p2 then writeln('На одной прямой') else writeln('Не на одной прямой');
end.
Пример ввода:
1
1
2
2
3
3
Пример вывода:
<span>На одной прямой</span>
Ответ:
case m / 2 + 1 of // значения в case должно быть целым
Объяснение: