1,Опишите целочисленный массив из 32 элементов 2,Массив заполнен по закону: var...

Question

1,Опишите целочисленный массив из 32 элементов 2,Массив заполнен по закону: var a:arrey(1/...20) of integer, i :integer. begin for i:=2 to 20 do a(i):=2*i+5 Чему равны первый, пятый и десятый элементы?

Comments

так от 1 до 20 или от 2 до 20 массив

Answer 1

var

mas:array[1..20]of integer;

i:integer;

//s,s1:integer;

begin

writeln('Элементы массива:');

for i:=2 to 20 do  

begin

mas[i]:=2*i+5;

write(' ',mas[i]);

end;

writeln();

write('Первый элемент массива: ',mas[1]+#10+'Пятый элемент массива: ',mas[5]+#10+'Десятый элемент массива: ',mas[10]);

end.