Так как на большинстве версий "Паскаля" мы не можем установить шаг цикла в for, будем использовать цикл while для решения данной задачи.
Возьмём переменную i для хранения нужных нам значений, дадим ей значение равное 1001, запустим цикл while, который будет выполняться пока наша i <= 1025, в цикле у нас будет выводиться на экран значение переменной i, а затем переменная увеличиваться на 3.
Так как на большинстве версий "Паскаля" мы не можем установить шаг цикла в for, будем использовать цикл while для решения данной задачи.
Возьмём переменную i для хранения нужных нам значений, дадим ей значение равное 1001, запустим цикл while, который будет выполняться пока наша i <= 1025, в цикле у нас будет выводиться на экран значение переменной i, а затем переменная увеличиваться на 3.
Алгоритм на языке Паскаль:
var
i : integer;
begin
i := 1001;
while i <= 1025 do
begin
write(i,' ');
i := i + 3;
end;
end.
ответ:Информационный размер статьи I=k*i, где k-количество символов в статье, i- количество бит на один символ.
1) k=32*40*64= 81920
I= 81920*8= 655360 бит
655360 бит/8= 81920 байт
81920 байт/1024= 80 Кбайт
ответ: 80 Кбайт
2)k=48*40*40= 76800
I=76800*8= 614400 бит
614400 бит/8= 76800 байт
76800 байт/1024= 75 Кбайт
ответ: 75 Кбайт
3)k=64*40*48= 122880
I=122880*8= 983040 бит
983040 бит/8= 122880 байт
122880 байт/1024= 120 Кбайт
ответ: 120 Кбайт
4)k=64*40*64= 163840
I=163840*8= 1310720 бит
1310720 бит/8=163840 байт
163840 байт/1024= 160 Кбайт
ответ: 160 Кбайт
Подробнее - на -
Объяснение: