Даны два числа а и в. Увеличить А в 5 раз, ели оно меньше В. Если В меньше А, то заменить...

Question

Даны два числа а и в. Увеличить А в 5 раз, ели оно меньше В. Если В меньше А, то заменить В на значение А, а А на значение В. Напишите программу на Pascal ABC пж.

Answer 1

var a,b,t:longint;

begin

readln(a,b);

if(a writeln('a = ',a);

writeln('b = ', b);

end.