Занести в одно мерный массив целые числа с клавиатуры. Затем определить в массиве и вывести на экран следующие значения: числа-элементы массива, у которых индекс (номер элемента массива) заканчивается цифрой 3.

var i:integer; a:array[1..20] of integer;beginfor i:=1 to 20 doreadln(a[i]);for i:=1 to 20 doif (i=3) or (i mod 10=3) then writeln(a[i]);readln;end.