программа для нахождения наименьшего и наибольшего из трех чисел в паскале

Question

Информатика

Мирон

6 апреля, 10:14

программа для нахождения наименьшего и наибольшего из трех чисел в паскале

+3

Ответы (1)

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

Анект · Answer 1

Program Pr1;

uses crt;

var a, b, c, max:integer;

begin

clrscr;

readln (a, b, c) ;

if a>b then max:=a

else max:=b;

if c>max then max:=c;

writeln (max) ;

end.