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

Question

Информатика

Алько

16 апреля, 23:26

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

+2

Ответы (2)

Знаете ответ на вопрос?

Убайда · Answer 1

program dvachisla;

var a, b:integer;

begin

write ('vvedite chislo a') ;

read (a) ;

write ('vvedite chislo b') ;

read (b) ;

if a>b then write ('a bolshe b')

else write ('b bolshe a') ;

end.

Финолла · Answer 2

Var a, b integer;

Begin

Writeln ('Введите числа а и b') ;

Readln (a, b) ;

If a > b then

Writeln (a, ' больше чем ', b)

Else

Writeln (b, ' больше чем ', a)

End.