( робот:условный оператор )

(1) цирк  (2) пирк    (3)  пирзприз  (1) волк  (2) солк(3)  солн  слон  (1) стук   (2)  (м) мтук(3) (ь)  мтуьмуть  (1) крот     (2)  (м) мрот(3) (г)  мрогморг

в цикле sum [i]: =sum+mas[i,j];

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.

в одном байте восемь бит. следовательно 100/8=12.5   ответ 12.5