Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

вычислить сумму всех четных натуральных чисел меньше данного n . задаччерез паскаль.. задача по информатике

10-11 класс

Matveevatomuly 14 дек. 2013 г., 8:25:37 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Muhammad1998
14 дек. 2013 г., 11:19:25 (10 лет назад)

var a,n,s:integer;
begin
write('введите число n ');
readln(n);
s:=0;
for a:=1 to n do
if (a<n) and (a mod 2 =0) then s:=s+a;
write(s);
end.

Ответить

Другие вопросы из категории

Программу надо написать в С++.

С помощью процедуры rand генерируются N случайных чисел. Числа, меньшие, чем

Читайте также



Вы находитесь на странице вопроса "вычислить сумму всех четных натуральных чисел меньше данного n . задаччерез паскаль.. задача по информатике", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.