Найти сумму чисел 2^2+3^3+4^4...6^6 (pascal)
Найти сумму чисел 2^2+3^3+4^4...6^6 (pascal)
Гость
Ответ(ы) на вопрос:
Гостьvar
s,i : integer;
begin
s :=0;
for i := 2 to 6 do
s := s + sqr(i);
writeln (s);
end.
Не нашли ответ?
Похожие вопросы