сервис вопросов и ответовВычеслите сумму квадратов всех четных чисел от1 до n
5-9 класс|
|
Kimimaro121212
17 сент. 2014 г., 12:31:21 (9 лет назад)
Ezanozina
17 сент. 2014 г., 13:35:10 (9 лет назад)
var
i, n, s: integer;
begin
readln(n);
for i := 1 to n do begin
if(i mod 2 = 0) then s := s + sqr(i);
end;
writeln(s);
end.
Ответить
Другие вопросы из категории
Читайте также
Вариант № 2 1)Подсчитать сумму квадратов всех отрицательных и четных чисел из 10 вводимых. 2) Даны натуральные числа от 35 до 87.
Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5.
3)Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n, используя в программе лишь операцию умножения.
4)Введите последовательность из n целых чисел. Найти наибольшее из всех отрицательных чисел. Вывести его значение и порядковый номер.
5)Вычислите: 99-97+95-93+91-89+....+7-5+3-1.
6)Доказать (путем перебора возможных значений), что для любых величин А, В, С типа Boolean следующая пара логических выражений имеет одинаковые значения (эквивалентны): A OR (B AND C) и (A OR B) AND (A OR C).
По записанному на алгоритмическом языке алгоритму подсчитать сумму квадратов последовательности натуральных чисел.
алг сумма квадратов (цел S)
рез S
нач нат n
S := 0
для n от 1 до 3
нц
S := S + n*n
кц
кон
Вы находитесь на странице вопроса "Вычеслите сумму квадратов всех четных чисел от1 до n", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.