Тема массивы.

Язык - pascal abc.

Нужна программа по принципу работы Вводим 10 элементов массива - выводятся нечетные.

Question

Информатика

Филарета

21 июня, 02:29

Тема массивы.

Язык - pascal abc.

Нужна программа по принципу работы Вводим 10 элементов массива - выводятся нечетные.

+4

Ответы (1)

Знаете ответ на вопрос?

Юстина · Answer 1

const n=10;

var a:array [1 ... n] of integer;

i: integer;

begin

randomize;

writeln ("Массив из 10 элементов:') ;

for i:=1 to n do

begin

a[i]: = random (101) ;

write (a[i],' ') ;

end;

writeln ('Нечетные элементы:') ;

for i:=1 to n do

if a[i] mod 20 then

write (a[i],' ') ;

end.

Используем рандом для заполнения массива

Тема массивы.Язык - pascal abc.Нужна программа по принципу работы Вводим 10 элементов массива - выводятся нечетные.

Тема массивы.

Язык - pascal abc.

Нужна программа по принципу работы Вводим 10 элементов массива - выводятся нечетные.