Перечислите те значения, которые будет принимать переменная цикла в данном фрагменте программы.
program d;
var a, b, c: integer;
begin
for c:= 1 to 5 do
begin
a:= a+ 1;
b:= b- 1;
end;
end.
Ответы
Ответ дал:
0
A:1,2,3,4,5;B:-1,-2,-3,-4,-5;C:1,2,3,4,5.
program d;
var a, b, c: integer;
begin
for c:= 1 to 5 do
begin
a:= a + 1;
b:= b - 1;
writeln (a:3,' ',b:3,' ',c:3);
end;
end.
program d;
var a, b, c: integer;
begin
for c:= 1 to 5 do
begin
a:= a + 1;
b:= b - 1;
writeln (a:3,' ',b:3,' ',c:3);
end;
end.
Похожие вопросы
7 лет назад
10 лет назад
10 лет назад
10 лет назад