Определи, что выведет программа: program prog; procedure alg(x, y: integer); var i, t: integer; begin for i := 1 to 4 do begin write(x, ' '); t := y; y := x + y; x := t; end; end; begin alg(8, 13); end. $8 \,13\, 21 \,34$ $13\, 21\, 34\, 55$ $8\, 13\, 8 \,13$ $8\, 8\, 8\, 8$
Задание

Определи, что выведет программа:

program prog;

procedure alg(x, y: integer);

var i, t: integer;

begin

for i := 1 to 4 do

begin

write(x, ' ');

t := y;

y := x + y;

x := t;

end;

end;

begin

alg(8, 13);

end.

Выбери верный вариант.

  • \(8 \,13\, 21 \,34\)
  • \(13\, 21\, 34\, 55\)
  • \(8\, 13\, 8 \,13\)
  • \(8\, 8\, 8\, 8\)