Помогите пожалуйста с информатикой:
Создать массив и вывести положительные элементы массива и их номера. Элементы массива вводятся генератором случайных чисел.
Например: Если массив а[1..5]: -15, -7, 8, 23, -11, то должны получить: 8, 3, 23, 4.
С блок схемой пожалуйста
Ответы
Ответ дал:
0
Ответ:
program a1;
var n,i:integer;a:array[1..100] of integer;
begin
write ('n'); readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n do if abs(a[i]) mod 7=0
then write (a[i],'');
readln
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
9 лет назад
9 лет назад