найти сумму элементов кратных 5 в одновременном массиве
10-11 класс
|
Ответ во вложенном файле
program zadacia;
const n=10;
var a :array [1..n] of integer;
s,i:integer;
begin
writeln('vvedite massiv=');
for i :=1 to n do
readln(a[i]);
s:=0;
for i:= 1 to n do
if a[i] mod 5 =0 then s:=s+a[i];
writeln('s=',s);
readln;
end.
на каком языке? каков размер массива? и каково должно быть оформление программы
Одновременный массив - это пять! Вообще-то, одномерный.
я всмысле размер массива в цифрах если нет но надо вводить размер его что-ли а это я не знаю как только знаю как с одномерным массивом и с заданным числом элементов и надо писать что на паскале
Другие вопросы из категории
заглавные. Фон ячейки номер 8 – желтый, фон самой таблицы – красный.
ю следующую минуту вирусы уничтожают по одной бактерии и снова делятся.Через сколько минут вирусы уничтожат все бактерии? Нужно привести решение в Паскале.Очень срочно!
Читайте также
Вывести на экран массив в виде таблицы и сумму элементов массива.
Двухмерный массив размером M*N заполнить целыми числами в интервале от 2 до 9. Вывести полученный массив на экран в виде таблицы. Найти сумму элементов кратных 2 в первых трёх столбцах.
нечетных местах , сменить знак на противоположный ,иначе выдать соответствующее сообщение.
2.Дан массив X(N,M) . Среди четных столбцов массива найти сумму положительных элементов
3.Найти произведение элементов каждого столбца массива принадлежащих промежутку [2,6] . Из полученных значений сформировать одномерный массив.