Введены 2 числа, выведите их произведение, если первое больше второго и разность их в противном случае

Question

Гость

Ответ(ы) на вопрос:

Гость

var a,b,s:integer; begin readln(a,b); if (a>b) then s:=a*b else s:=a-b; writeln(s); end.

Accepted Answer

var a,b:integer; begin readln(a,b); if (a>b) then writeln(a) else begin writeln(b); end; readln; end.