составьте программу которая запрашивает значения элементов одномерного числового массива а, стоящего из 10 элементов,формирует и выводит на экран в
5-9 класс
|
строку данный массив. Найти сумму неположительных элементов массива,количество элементов кратных 3, произведение элементов,стоящих на четных местах
program z1;
uses crt;
var m: array[1..10] of integer;
i,a,b,c:integer;
begin
for i:=1 to 10 do
readln(m[i]);
writeln;
a:=0;
b:=0;
c:=1;
for i:=1 to 10 do
begin
if m[i]<=0 then a:=a+m[i];
if m[i] mod 3 = 0 then b:=b+1;
if i mod 2 = 0 then c:=c*m[i];
end;
writeln(Сумма отриц'',a);
writeln(кратные 3'',b);
writeln(произв'',c)
end.
Другие вопросы из категории
Читайте также
2-ая Составить программу , которая в двумерном массиве случайных чисел элементы всех четных строк делает нулевыми
язык паскаль
программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с положительными значемиями
например армия(строка а)
арбуз (строка б)
2)составьте программу ,которая предлагает ввести с клавиатуры две строки а и б ,соеденяет их и выводит результат в одну строку
например: тепло(строка а)
ход(строка б)
задачи:
1.Найдите сумму всех элементов одномерного числового массива.
2.найдите произведение всех элементов одномерного числового массива.
3.найдите количество отрицательных элементов одномерного числового массива.
4.найдите количество нечетных элементов одномерного числового массива.
5.найдите количество элементов одномерного числового массива <20.
6.найдите количество кратных 7 элементов одномерного числового массива.
7.найдите сумму элементов одномерного числового массива=8.
8.найдите сумму кратных 11 элементов одномерного числового массива.
9.найдите сумму чётных элементов одномерного числового массива.
10.найдите произведение кратных 3 элементов одномерного числового массива.
11.найдите произведение элементов одномерного числового массива >2 и <5.
12.вывести на экран элементов одномерного числового массива >15.
13.вывеси на экран элементов одномерного числового массива кратных 21.
14.вывести на экран четные элементов одномерного числового массива.