Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

составить программу вычисляющее наибольшее из 3 заданных чисел(паскаль)

Ответ оставил Гость

var

a,b,c:integer;

writeln(a,b,c); readln(a,b,c);

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

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

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

end;

можно через один if.