Помогите пожалуйста с программой в паскале.

Question

Дан целочисленный массив, состоящий из n элементов. Вывести на экран все элементы кратные 3 и 5.

Александр Галашкин · Accepted Answer

Вот код, только звёздочки уберите, пожалуйста: 
 program myapp; 
 
const n = 5; { Количество элементов массива. } 
 
var myarray: array[0..n] of integer; i: integer; 
 
begin 
{ Заполнение массива. } 
for i := 0 to n do begin 
myarray[*i*] := Random(200) + 1; 
end; 
{ Вывод элементов, кратных 3 и 5. } 
for i := 0 to n do begin 
if (myarray[*i*] mod 3 = 0) and (myarray[*i*] mod 5 = 0) then WriteLn(myarray[*i*]); { ЗВЁЗДОЧКИ УБРАТЬ! } 
end; 
readln; 
end.