Написать программу: найти сумму четных и нечетных n-чисел
5-9 класс
|
program zzz;
var a, b, n, i, ss, s : integer;
begin
WRITELN ( ' введите количество чисел' );
readln (n);
s := 0;
ss := 0;
For i := 1 to n do
begin
if i mod 2 =0 then
s:= s+i
else
ss := ss + i;
end;
WRITELN ( 'Сумма четных чисел равна ',s );
WRITELN ( 'Сумма нечетных числе равна ' , ss);
end.
Другие вопросы из категории
Проблема: Надо создать программу в Паскаль который смог бы найти сумму элементов в каждом столбце. Это программа с Matrice и по моему с For.
Помогите пожалуйста, заранее спасибо!!!
система команд исполнителя вычислителя состоит из двух команд:
1-прибавить 2;
2-умножить на 3;
Составьте для вычислителя содержащего не более 6 команд алгоритм получение из числа 2 число 50
Константин) и отчество ('б' — Борисович или
файлов из этого списка,соответствующих запросу Письм*.?*
а)6
б)0
в)2
г)1
Читайте также
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
2) составить программу нахождения чисел от 10 до 99 сумма квадратов которых кратна 13 (mod=0)
3) найти сумму всех целых нечетных чисел меньших 100
4) найти сумму чисел в диапазоне от A до B кратных четырём. Числа А и В вводятся с клавы.
5) Найти все натуральный делители натурального числа n
положительных чисел, которые вводятся с клавиатуры. 2. Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности неограниченна).
1)Написать программу,подсчитывающую сумму положительных из трех данных чисел.
2)Напечатать те из двузначных чисел которые делятся на 4,но не делятся на 6.
СРОЧНО!!!
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!