ТутРешу.Ру

Напишите программу на языке авс паскаль…

Задание:

Напишите программу на языке авс паскаль, которая считывает два целых числа а и в и выводит наибольшее из них. Числа-целые от 1 до 100.

Решение:

var a,b: integer; beginreadln (a,b); if (a>b) then writeln (a) elsewriteln (b); end.




Знаете другой ответ?

Отправить свой ответ