Упр.2.202 ГДЗ Сборник упражнений Босова 7-9 класс (Информатика)
Проанализируйте фрагменты программ. Запишите результат их работы. Для каждого случая запишите фрагмент программы, обеспечивающий такой же результат, но с использованием другого оператора цикла (while/for).
- x := 1;
while x <= 5 do begin
writeln(x);
x := x + 1
end; - for x := -2 to 2 do begin
y := abs(x);
writeln(y);
end; - x := 10;
while x >= 5 do begin
writeln(x);
x := x — 1
end; - for x := 5 downto 0 do begin
y := x * x;
writeln(y);
end;
1) В цикле выводятся числа от 1 до 5:
x := 1;
while x <= 5 do
begin
writeln(x);
x := x + 1
end;
Эквивалентный фрагмент с оператором for:
for x := 1 to 5 do
writeln(x);
2) Выводятся модули чисел от $$-2$$ до $$2$$:
for x := -2 to 2 do
begin
y := abs(x);
writeln(y);
end;
Эквивалентный фрагмент с оператором while:
x := -2;
while x <= 2 do
begin
y := abs(x);
writeln(y);
x := x + 1
end;
3) В цикле выводятся числа от 10 до 5 в убывающем порядке:
x := 10;
while x >= 5 do
begin
writeln(x);
x := x — 1
end;
Эквивалентный фрагмент с оператором for:
for x := 10 downto 5 do
writeln(x);
4) Выводятся квадраты чисел от 5 до 0:
for x := 5 downto 0 do
begin
y := x * x;
writeln(y);
end;
Эквивалентный фрагмент с оператором while:
x := 5;
while x >= 0 do
begin
y := x * x;
writeln(y);
x := x — 1
end;
