ПОМОИГТЕ 40 поинтов Составить программу для решения задачи. Дано 2 целых числа. Если первое число больше второго, то найти их сумму, иначе найти их произведение. *

:

program z1;

var a,b,v:integer;

begin

write('a = ');

readln(a);

write('b = ');

readln(b);

if a>b then v:=a+b

else v:=a*b;

write(v)

end.

Если числа равны, то ищем произведение