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

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Число элементов в массиве:');  var a:=ReadArrInteger('Вводите элементы:',n);  a.Where(t->t mod 6=0).Println(', ')end.

uses crt; const N=5var a:array[1..N] of integer; b: array[1..N] of integer; i: integer; beginfor 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.