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