Найти сумму квадратов первых 10 чисел. К данной задаче написать циклический алгоритм «пока» Срочно ПОМОГИТЕ Заранее спасибо
Ответы
Ответ дал:
0
program summakv;
var
n, i: integer;
begin
n := 0;
while i < 11 do
begin
n := n + sqr(i);
i := i + 1;
end;
writeln('Сумма квадратов первых десяти чисел = ', n);
end.
Ответ: 385
var
n, i: integer;
begin
n := 0;
while i < 11 do
begin
n := n + sqr(i);
i := i + 1;
end;
writeln('Сумма квадратов первых десяти чисел = ', n);
end.
Ответ: 385
Вас заинтересует
2 года назад
2 года назад
8 лет назад
8 лет назад
8 лет назад