Даны 2 числа, если первое больше второго, тогда записать в переменную С значение первого числа, если нет, второго числа и вывести его
Начало
А>B?
---ДА: C:=A
---НЕТ: С:=В
Вывести переменную С
С. Потому что бинарные числа самые простые числа
Var A :array [1..20] of integer ; i:integer;
begin
for i :=1 to 20 do
begin
a[i]:=random(-10,30);
write(a[i],'...');
end;
end.
1.Обычный шрифт.
2.Жирный.
3.Курсивный.
4.Подчеркнутый.
5.Жирный,курсивный.
6.Жирный,подчеркнутый.
7.Курсивный,подчеркнутый.