Создать массив, вводя значения с клавиатуры. Вывести на экран элементы кратные шести.

Например: Если массив а[5]:-12,7,18,23,-11, то должны получить : - 12,18.

Question

Информатика

Амонаф

6 августа, 09:00

Создать массив, вводя значения с клавиатуры. Вывести на экран элементы кратные шести.

Например: Если массив а[5]:-12,7,18,23,-11, то должны получить : - 12,18.

+2

Ответы (1)

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

Анджий · Answer 1

Uses crt;

const N=5

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

b: array[1 ... N] of integer;

i: integer;

begin

for i:=1 to n do begin

write ('a[', i, ']=') ;

read (a[i]) ;

end;

writeln ('Ishodniy massiv a') ;

for i:=1 to n do

write (a[i],' ') ;

for i:=1 to n do

if a[i] mod 3=0 then write (a[i], ' ') ;

end.

Создать массив, вводя значения с клавиатуры. Вывести на экран элементы кратные шести.Например: Если массив а[5]:-12,7,18,23,-11, то должны получить : - 12,18.

Создать массив, вводя значения с клавиатуры. Вывести на экран элементы кратные шести.

Например: Если массив а[5]:-12,7,18,23,-11, то должны получить : - 12,18.