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.
Объяснение:
Если числа равны, то ищем произведение
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.
Объяснение:
Если числа равны, то ищем произведение