Даны 2 числа . найти наибольшее из них . ( разработка программ на языке Паскаль , с использованием оператора ветвления и логических операций )

Даны 2 числа . найти наибольшее из них . ( разработка программ на языке Паскаль , с использованием оператора ветвления и логических операций )
Гость
Ответ(ы) на вопрос:
Гость
var a,b:integer; begin  readln(a,b);  if a>b then writeln(a,' больше ',b) else if a=b then writeln('Числа равны') else writeln(b,' больше ',a); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы