С клавиатуры вводится три числа вывести их на экран в порядке возрастания

Question

Информатика

Ноя

19 августа, 00:07

С клавиатуры вводится три числа вывести их на экран в порядке возрастания

+4

Ответы (1)

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

Урвин · Answer 1

Uses crt;

var a, b, c:real;

Begin

ClrScr;

writeln ('введи число') ;

read (a) ;

writeln ('введи число') ;

read (b) ;

writeln ('введи число') ;

read (c) ;

writeln ('самое большое') ;

if (a>b) and (a>c) then

writeln (a)

else if (b>a) and (b>c) then

writeln (b)

else

writeln (c) ;

End.