введите два числа. если первое число больше другого, то необходимо умножить первое число на второе, если второе число больше,то необходимо второе число разделить на первое. выведите результат на экран
Ответ:
Var i,a,b:integer;
Begin
read(a); read(b);
if(a>b)then begin
writeln(a*b);
end else begin
writeln(b div a);
end;
end.
Объяснение:
программа написана на Pascal