Задание
Определи, что выведет программа:
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(5,8);
end.
Выбери верный вариант.
- \(8\, 12\, 21\, 34\)
- \(5\, 8\, 5\, 8\)
- \(5\, 8 \,13\, 21\)
- \(5\, 5\, 5 \,5\)