Задание 1 Вариант 3 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
ВАРИАНТ 3
Напишите программу. Заполните массив $$C[1..20]$$ так, чтобы каждый элемент с чётным номером был равен половине своего номера, а каждый элемент с нечётным номером — нулю. По результатам работы программы заполните таблицу:
$$C[1]$$ = $$C[6]$$ = $$C[11]$$ = $$C[16]$$ = $$C[2]$$ = $$C[7]$$ = $$C[12]$$ = $$C[17]$$ = $$C[3]$$ = $$C[8]$$ = $$C[13]$$ = $$C[18]$$ = $$C[4]$$ = $$C[9]$$ = $$C[14]$$ = $$C[19]$$ = $$C[5]$$ = $$C[10]$$ = $$C[15]$$ = $$C[20]$$ =
Нужно заполнить массив $$C[1..20]$$ по правилу: если номер элемента чётный, то значение равно половине номера; если номер нечётный, то значение равно $$0$$.
Тогда получаем:
| $$C[1]=0$$ | $$C[6]=3$$ | $$C[11]=0$$ | $$C[16]=8$$ |
| $$C[2]=1$$ | $$C[7]=0$$ | $$C[12]=6$$ | $$C[17]=0$$ |
| $$C[3]=0$$ | $$C[8]=4$$ | $$C[13]=0$$ | $$C[18]=9$$ |
| $$C[4]=2$$ | $$C[9]=0$$ | $$C[14]=7$$ | $$C[19]=0$$ |
| $$C[5]=0$$ | $$C[10]=5$$ | $$C[15]=0$$ | $$C[20]=10$$ |
Программа на Pascal:
program s4_v3_1;
const
n = 20;
var
c: array[1..n] of integer;
i: integer;
begin
for i := 1 to n do
begin
if i mod 2 = 0 then c[i] := i div 2
else c[i] := 0;
end;
end.
Ответ
$$C[1]=0,\ C[2]=1,\ C[3]=0,\ C[4]=2,\ C[5]=0,\ C[6]=3,\ C[7]=0,\ C[8]=4,\ C[9]=0,\ C[10]=5,\ C[11]=0,\ C[12]=6,\ C[13]=0,\ C[14]=7,\ C[15]=0,\ C[16]=8,\ C[17]=0,\ C[18]=9,\ C[19]=0,\ C[20]=10$$
