Ответ(ы) на вопрос:
Если прописать в паскаль этот алгоритм через цикл while (цикл с предусловием), то ответ будет B=25.
var a, b: integer;
begin
a := 2;
b := 0;
while a <> 7 do
begin
a := a + 1;
b := b + a;
end;
writeln(b);
end.
Не нашли ответ?
Похожие вопросы