Регистрация
vbratilova4
10.12.2020 09:46
Информатика
Есть ответ 👍

Дано описание массива: consta: array[1..3]of integer=(12,7,58); верно ли описан массив?

242
258
Посмотреть ответы 2

Ответы на вопрос:

ання2018
ання2018
4,5(17 оценок)
Только пробел между const и a надо поставить const a: array[1..3]of integer=(12,7,58); тогда правильно
aalleeks
aalleeks
4,7(20 оценок)

var

  k, i, n, x: integer;

begin  

  readln (n);

  k : = 0;

  for i : = 1 to n do

  begin

    readln (x);

    if (x mod 10 = 4) and (x mod 6 = 0) then

    k : = k+1;

  end;

    writeln (k);

end.  

Популярно: Информатика