СРОЧНО!!! 100 баллов. Помогите по информатике даю 100 баллов. 1.Наберите и отладьте...

Question

СРОЧНО!!! 100 баллов. Помогите по информатике даю 100 баллов. 1.Наберите и отладьте программу: Program massiv; var C: array(-10..10) of real; begin for i:=1 to 20 do Read(C[i]); for i:=1 to 20 do C[i]:=C[i]/10; for i:=1 to 20 do Write(C[i]) end. 2. Запишите - имя массива - тип массива - нижнюю границу индекса массива - верхнюю границу индекса массива - размерность массива 3. запишите, что делает данная программа.

Answer 1

Ответ:

Program massiv;

var C: array[0..20] of real;

i: integer;

begin

for i:=0 to 20 do

Read(C[i]);

for i:=0 to 20 do

C[i]:=C[i]/10;

for i:=0 to 20 do

Write(C[i]);

end.

Объяснение:

2) - имя массива (С)

- тип массива (Вещественный)

- нижнюю границу индекса массива (0)

- верхнюю границу индекса массива(20)

- размерность массива(21)

3) Программа изначально принимает значения с клавиатуры от пользователя, затем у каждого числа смещает разряд (Было 35.0 стало 3,5) как пример, и все это выводится на экран.