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

1

Ответы и объяснения

Лучший Ответ!
2014-03-21T14:48:07+00:00
Var i:integer; a:array[1..20] of integer;
begin
for i:=1 to 20 do
readln(a[i]);
for i:=1 to 20 do
if (i=3) or (i mod 10=3) then writeln(a[i]);
readln;
end.