Вопрос от пользователя: Виталя
Даны 2 переменные А и В. Если A>B, то вывести на печать их произведение, в противном случае сумму.
Ответ: Геня
Var A, B : integer;
begin
Read (A);
Read (B);
if A>B then
Writeln (A*B)
else
Writeln (A+B);
end.
Вопрос от пользователя: Виталя
Даны 2 переменные А и В. Если A>B, то вывести на печать их произведение, в противном случае сумму.
Ответ: Геня
Var A, B : integer;
begin
Read (A);
Read (B);
if A>B then
Writeln (A*B)
else
Writeln (A+B);
end.