Дан массив из элементов вывести на экран Каждый третий элемент масива

Question

Информатика

Фея

12 июля, 16:29

Дан массив из элементов вывести на экран Каждый третий элемент масива

+5

Ответы (1)

Знаете ответ?

Рубен · Answer 1

Program massiv;

const N=10;

var i:integer;

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

begin

randomize;

for i:=1 to N do

begin

mas[i]:=random (100) ;

write (mas[i],' ') ;

end;

writeln (' ') ;

for i:=1 to N do

begin

if i mod 3=0 then

write (mas[i],' ') ;

end;

end.