Составьте программку, которая позволяет вводить с клавиатуры элементы массива а [1..10]

include lt;stdio.hgt;
include lt;conio.hgt;
main()
     
int b,a[10],k=10,i;     
for (i=0;ilt;k;i++)         
scanf("%d",amp;a[i]);         
     
 for (i=0;ilt;k;i++)       
if ((i%2)gt;0)       
printf("\na[%d]=%d",i,a[i]);   
    
                   
 getch();       
 

1
2 var a:array [1..100] of integer; i:integer;
3 begin
4 for i:=1 to 10 do
5 read(a[i]);
6 for i:=1 to 10 do
8 writeln (a[i]);
9