Даны два числа, отличных друг от друга. Найти большее число. Вводные

Даны два числа, хороших друг от друга. Отыскать большее число. Вводные данные: а и b- два числа, где аlt;gt;b. Выходные данные:значение большего числа.

Задать свой вопрос
2 ответа
Var a,b integer;
Begin
Writeln(Введите числа а и b);
Readln(a,b);
If a gt; b then
Writeln(a, больше чем , b)
Else
Writeln(b, больше чем , a)
End.
Семён Утятников
Либо заместо Writeln(a, больше чем , b); и для б соответственно можно просто написать writeln(a) и writeln(b)
Аринка Каматесова
поможешь превосходнее иное?
Костя
Го
Maks
Ток я вопроса не сообразил
Гулевых Леша
давай позже:3 в иной раз:3
Jevelina Bagushevich
теснее урок окончен :3
Sasha Chelashina
))

program dvachisla;

var a,b:integer;

begin

write('vvedite chislo a');

read (a);

write ('vvedite chislo b');

read (b);

if agt;b then write ('a bolshe b')  

else write ('b bolshe a');

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт