Var num1,num2:real;
begin
write('Введите первое число: '); readln(num1);
write('Ведомое второе число: '); readln(num2);
writeln('Наибольшее число: ');
if (num1 > num2) then writeln(num1)
else writeln(num2)
end.
Автоматический (через заданное количество времени), и по щелчку
<span>Вариант 4:по цвету строки с командой</span>
32•128=4096(с.)- содержат 32 строки символов.
4096•8=32768(с.)- содержат 8 страниц символов.
Ответ: 32768 символов содержит 8 страниц.