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

Question

Информатика

Рона

19 сентября, 15:28

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

+1

Ответы (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.