Регистрация
Luikas45676345
24.10.2020 17:46
Информатика
Есть ответ 👍

Вводятся два числа не равные 0 вывести наибольшее паскаль

201
332
Посмотреть ответы 3

Ответы на вопрос:

zhan05041976
zhan05041976
4,7(27 оценок)
Если числа целые: program n; var a,b: integer; begin readln(a); readln(b); if a> b then write(a) else write(b); end. если предполагается ввод нецелых чисел, то в объявление переменных (var a,b: integer; ) надо поменять integer на real.
Jeka990
Jeka990
4,8(37 оценок)
Begin var (a,b): =readinteger; if a> b then write(a) else write(b); end.
irabirykova18
irabirykova18
4,7(52 оценок)

CV265  G13

Объяснение:

CV265

G13

Популярно: Информатика