var
a:array [1..20] of real;
i,b,count:integer;
p:real;
begin
a[1]:=0.3; a[11]:=36;
a[2]:=5; a[12]:=13;
a[3]:=68; a[13]:=15;
a[4]:=-3; a[14]:=28;
a[5]:=32; a[15]:=-0.7;
a[6]:=-80; a[16]:=-36;
a[7]:=-9; a[17]:=-0.3;
a[8]:=-26; a[18]:=8;
a[9]:=-9; a[19]:=15;
a[10]:=40; a[20]:=-7;
b:=5; count:=0; p:=1;
for i:=1 to 20 do
begin
write(a[i],' ');
if ) then
begin
inc(count);
p:=p*a[i];
end;
end;
writeln;
writeln('count: ',count,' Pr: ',p);
end.
8. Что определяет количество индексов массива?
Количество индексов определяет размерность массива. Если есть только один индекс, то это одномерный массив, два - двумерный и т.д.
9. Запишите имя массива, если он имеет элементы mas[1], mas[2], ...
Обращение к элементам одномерного массива имеет вид имя[индекс], значит, массив имеет имя mas
10. Задавая разные значення элементам массива, можно ли изменить размерность массива?
Нельзя. Размерность массива задается заранее, она определяет, как обращаться к элементам массива, и не зависит от их значений.
прямоугольник треугольник и овал (сердечко и корону
Объяснение: