напишите программу на языке авс паскаль, которая считывает два целых числа а и в и выводит наибольшее из них. Числа-целые от 1 до 100.

при решении задачи можно пользоваться только целочисленными арифметическими операциями. НЕЛЬЗЯ пользоваться нелинейными конструкциями: ветвлениями, циклами, функциями вычисления модуля, извлечения квадратного корня.

1

Ответы и объяснения

2016-07-28T22:07:20+00:00
Var a,b:integer; 
begin 
writeln('Введите числа a и b'); 
read(a,b); 
if a-b<0 then writeln(b) 
else writeln(a); 
end.