Дам 100 баллов срочно.паскаль. номер B1

Ответ:
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (a,b,c):=ReadInteger3;
  var max:integer;
  if a>b then max:=a else max:=b;
  if c>max then max:=c;
  Writeln(max)
end.

Добавить комментарий

You must have JavaScript enabled to use this form.