Beginvar (a, b) : = ReadInteger;if a>b then write (a) else write (b) ;end.
Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Если числа целые:program n;vara, b: integer;beginreadln (a) ;readln (b) ;if a>b thenwrite (a)else write (b) ;end.Если предполагается ввод нецелых чисел, то в объявление переменных (var a, b: integer;) надо поменять integer на real.