Определите, что будет напечатано в результате работы следующей программы. В качестве решения заполните таблицу с итерациями. var y, i: integer;
begin
y :=0;
for i :=1 to 3 do
y :=y+4*i;
write (y);
end.

24

Объяснение:

program 1;

var y, i: integer;

begin

   y :=0;

   for i := 1 to 3 do

   begin

       y := y + 4*i;

       write (y);

   end;

end.

Эта программа выдаст 41224

program 2;

var y, i: integer;

begin

   y :=0;

   for i := 1 to 3 do

       y := y + 4*i;

       write (y);

end.

Эта программа выдаст 24