Задание
Определи, что выведет программа:
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\)