Составить программу на вычисление суммы четных чисел от 1 до 100, через оператор for
10-11 класс
|
вот Паскаль
var a,i:integer;
begin
a:=0;
for i:=1 to 100 do begin
if (i mod 2=0) then
a:=a+i;
end;
writeln(a);
end.
Другие вопросы из категории
Напишите на C#
что он был представлен в 16-битной кодировке Unicode, а на одной странице-400 символов.
Читайте также
2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.
2)Написать программу определяющую сумму всех нечетных чисел от 1 до 99