сервис вопросов и ответовВычислите сумму квадратов N четных натуральных чисел.
5-9 класс|
|
Влася
15 янв. 2017 г., 19:12:35 (7 лет назад)
Tus1111
15 янв. 2017 г., 21:31:41 (7 лет назад)
Program fanatpetsa;
var sum,i,n : integer;
begin
writeln('* alphaues is thinking... *');
write('Ok, введите число N =');
readln(n);
sum:=0;
for i:=1 to n do
begin
if n mod 2 = 0 then sum := sum + n*n;
end;
writeln('Сумма квадратов равна ',sum);
writeln('*******************************');
end.
Ответить
Другие вопросы из категории
Читайте также
Помогите составить программу , вычисляющую сумму квадратов n чётных натуральных чисел
( сейчас прошли циклические алгоритмы, нужна и блок-схема)
Вы находитесь на странице вопроса "Вычислите сумму квадратов N четных натуральных чисел.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.