Вопрос Помогите решить задачу в языке программирования Paskal. Даётся 3 целых числа a,b,c надо вывести на е

[Trololo4ko]

Помогите решить задачу в языке программирования Paskal. Даётся 3 целых числа a,b,c надо вывести на екран максимум.

 

[игорьггг]

Во-первых - Pascal var a,b,c:integer; begin if a>b and a>c then writeln(a); else if b>a and b>c then writeln(b); else if c>a and c>a then writeln(c); end.

 

[FuFeL]

program maxiz3; var a,b,c : Integer; begin Readln(a,b,c); if a<b then a := b; if a<c then WriteLn(c) else Writeln(a); end.