Сержант
Оракул
(90774)
5 лет назад
var
a, b: integer;
begin
Write('Введите два чиссла: '); ReadLn(a, b);
Write('Ответ: ');
if a > b then WriteLn(a) else if b > a then WriteLn(b) else WriteLn('Числа равны');
end.
Мария ЛевошинаПрофи (961)
5 лет назад
О, Боже. Проще жалобу в департамент написать, что тесты с потолка берут, не проверяя. writeln- ошиблась. Спасибо большое. Это же возможно в одну строчку написать, да? там только одна строчка.