Пожалуйста посчитайте пожалуйста с информатикой:Создать массив и вывести положительные элементы массива и их номера. Элементы массива вводятся генератором случайных чисел.Например: Если массив а[1..5]: -15, -7, 8, 23, -11, то должны получить: 8, 3, 23, 4.С блок схемой пожалуйста

Question

Rtyuig

5 год назад

ОТВЕТЫ

Ефрем

Oct 24, 2020

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.

104