Предмет: Информатика, автор: vvvnik

Напишите программу по этой схеме
Начало
Ввести А, В
А>В
да(X=A*B)
нет(X=A+B)
Вывод X
Конец

Заранее спасибо.

Ответы

Автор ответа: jurymacarow
0
var A,B,X:integer;
begin
readln(A,B);
If A>B then X:=A*B else X:=A+B;
writeln(X);
end.
Похожие вопросы
Предмет: Литература, автор: nv16032010
Предмет: Русский язык, автор: jibek878787
Предмет: Алгебра, автор: Dracovskyyy
Предмет: Математика, автор: катя101211