Cоставить программу, которая формирует массив из 16 случайных целых чисел от -20 до 20 и выводит элементы, кратные 3. на экран выводится исходный массив и найденные элементы.

GLEBfy GLEBfy    3   16.06.2019 22:40    1

Ответы
Никита50005 Никита50005  13.07.2020 18:24
Const n=16;
var a:array[1..n] of integer;   
i:integer;
begin
for i:=1 to n do begin 
a[i]:=random(40)-20;
write (a[i], ' ');
end;
writeln;
for i:=1 to n do
if (a[i] mod 3)=0 then write (a[i], ' ');
end. 
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика