сервис вопросов и ответовв одномерном массиве, заполненном случайными числами посчитать сумму и количество четных чисел.Массив размером 20
10-11 класс|
|
Стисняшка
17 авг. 2014 г., 19:30:32 (9 лет назад)
Milkamilka125
17 авг. 2014 г., 20:38:50 (9 лет назад)
program name;
uses crt;
var s,k:,i:integer;
aa:array [1..20] of integer;
begin
clrscr;
s:=0;
k:=0;
for i:=1 to 20 do begin
aa[i]:=random(100);
if aa[i] mod 2 = 0 then begin
s:=s+aa[i];
k:=k+1;
end;
end;
writeln('В данном массиве ',k,'четных чисел, сумма которых равна ',s);
end.
Ответить
Другие вопросы из категории
автоматическое устройство осуществило перекодировку информационного сообщения на русском языке длинной в 20 символов, первоначально записанного в
2-байтном коде Unicode, в 8-битную кодировку КОИ-8. На сколько бит уменьшилась длина сообщения?
помогоите пожалуйста!) Объем свободной памяти на диске -0,03 Гб, разрядность звуковой платы-8. Какова длительность звучания цифрового аудиофайла, записа
нного с частотой дискретизации 22,5 кГц?
Читайте также
1.Одномерный массив заполнен случайным образом. Найти количество четных элементов. 2. Одномерный массив размерностью N , где N -нечетное число,
заполнен случайными числами от -15 до 6. Все , числа кратные 3 заменить на противоположные.
Помогите составить блок-схему алгоритма и программу на алгоритмическом языке программирования БЕЙСИК обработки одномерного массива.Заполнение массива
элементами организовать путем ввода с клавиатуры.В одномерном массиве из N чисел вывести на экран отрицательные элементы и сообщите об их количестве.Пожалуйста,срочно надо.
Помогите пожалуйста с задачками))) Pascal
1) Найти сумму всех элементов массива, заполненных случайными числами?
2) Найти сумму четных элементов массива?
3) Найти сумму элементов массива, стоящих на четных местах?
Вы находитесь на странице вопроса "в одномерном массиве, заполненном случайными числами посчитать сумму и количество четных чисел.Массив размером 20", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.