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

Арсений4455 Арсений4455    2   03.10.2019 08:10    0

Ответы
Petrovaaleksanik Petrovaaleksanik  09.10.2020 13:36
Var a,b integer;
Begin
Writeln(‘Введите числа а и b’);
Readln(a,b);
If a > b then
Writeln(a, ‘ больше чем ‘, b)
Else
Writeln(b, ‘ больше чем ‘, a)
End.
ПОКАЗАТЬ ОТВЕТЫ
юлка10 юлка10  09.10.2020 13:36

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика