Задание

Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щих программ.

  • Объекты 1
    • Var s,k: integer;
      Begin s := 0;
      for k := 9 to 13 do s := s + 9;
      writeln\(s\); End.
    • Var s, k: integer;
      Begin s := 1;
      for k := 0 to 9 do s := s + 5;
      write \(s\); End.
    • Var s, n: integer;
      Begin s := 5;
      For n := 2 to 4 do s := s + \(n\-1\);
      Writeln\(s\); End.
    • Var s, k: integer;
      Begin s := 1;
      for k := 0 to 4 do s := s*3;
      write \(s\); End.
    • Var f,n: integer;
      Begin f := 22;
      f := f–20; For n := 1 to 5 do
      f := f + n; Writeln\(f\);
      End.
  • Объекты 2
    • 45
    • 51
    • 11
    • 243
    • 17