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

Question

Информатика

Марклена

2 мая, 11:14

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

+1

Ответы (2)

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

Духа · Answer 1

Var a, b integer;

Begin

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

Readln (a, b) ;

If a > b then

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

Else

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

End.

Малання · Answer 2

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.