Установие соответствие между описанием программы и ее записью на языке ПАСКАЛЬ program NahojdenieMAX; function max (x, y: integer): integer; begin if x > y then max:= x else max:=y; end; var a, b, c, d, f: integer; begin readln (a, b, c, d); f:= max (max(a,b), max (c,d)); writeln ('f=' , f); end. Заголовок главной программы Раздел операторов главной программы Раздел описания функции Раздел описания переменных
Задание

Установие соответствие между описанием программы и ее записью на языке ПАСКАЛЬ

  • Объекты 1
    • program NahojdenieMAX;
    • function max \(x, y: integer\): integer;
      begin
      if x > y then max:= x else max:=y;
      end;
    • var a, b, c, d, f: integer;
    • begin
      readln \(a, b, c, d\);
      f:= max \(max\(a,b\), max \(c,d\));
      writeln \('f=' , f\);
      end.
  • Объекты 2
    • Заголовок главной программы
    • Раздел операторов главной программы
    • Раздел описания функции
    • Раздел описания переменных