с информатикой: Создать массив и вывести положительные - вопрос №11634374 от Viktori1111112111 19.10.2021 13:53

Question

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

Viktori1111112111 · Answer

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....