Написать программу с условным оператором, где величине присваевается наибольшее значение из 3 заданных чисел

Question

Информатика

Христоша

7 мая, 09:56

Написать программу с условным оператором, где величине присваевается наибольшее значение из 3 заданных чисел

+2

Ответы (2)

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

Вероника · Answer 1

Var

A, V:real;

Begin

Write ('a = ') ;

ReadLn (V) ;

Write ('b = ') ;

ReadLn (A) ;

if A>V then V:=A;

Write ('b = ') ;

ReadLn (A) ;

if A>V then V:=A;

WriteLn ('Max (a, b, c) = ', V) ;

End.

Станиславка · Answer 2

Var

a, b, c: integer;

begin

writeln ('Вводим числа') ;

readln (a, b, c) ;

if a < b then a : = b;

if a < c then a : = c;

writeln ('Max = ', a) ;

end.