74

В среде программирования FreePascal cоставить программу, определяющую большее из двух…

29 марта 2023

В среде программирования FreePascal cоставить программу, определяющую большее из двух чисел. Проверить работу программы для всевозможных комбинацийчисел

категория: информатика

38

var a,b: integer; beginwriteln ('Введите два числа'); readln (a,b); if (a>b) then writeln (a) else if (b>a) then writeln (b) else if (a=b) then writeln ('Ошибка'); readln; end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...