Составить программу Паскаль, которая получает наход 2 числа и выводит наибольшее

Составить программку Паскаль, которая получает наход 2 числа и выводит максимальное из них

Задать свой вопрос
Darja Gachevskaja
Учесть, что они могут быть равными?
Бракарова Мила
Без понятия
1 ответ

var a,b: integer;

begin

read(a,b);

if a gt; b then write (a)

else write (b)

end.

Или (если учитывать вероятное равенство чисел)

var a,b: integer;

begin

read(a,b);

if a = b then write ('a = b')

else if a gt; b then write (a)

else write (b)

end.

Taktashev Kirill
Быстрее 1-ый вариант...
Люба Скатертикова
Спасибо
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт