1) 5000Кб - 4,9Мб
<span>540Кб - 552960байт
2) 113 страниц
4) 1650000
</span>5) 1 байт - 8бит
1Кбайт - 2^13бит
1Мбай т- 2^23бит
1Гбайт - 2^33бит
5200Кбайт - 42598400бит
32Мб - 2^28бит
<span>2Гб - 2^34 бит</span>
<span>Program Bob;
var z:integer;
begin
writeln('введи номер дня недели');
readln(z);
if z=1 then writeln('Понедельник')
else if z=2 then writeln('Вторник')
else if z=3 then writeln('Среда')
else if z=4 then writeln('Четверг')
else if z=5 then writeln('Пятница')
else if z=6 then writeln('Суббота')
else if z=7 then writeln('Воскресенье')
else writeln('нет такого дня недели');
readln;
end.
Пожалуйста :) ЫЫЫ</span>
Что значит из строки? Формулируйте лучше. Можно делать через обычный массив, примерно так
var
__________555______555
___________55555____55555
__________5555555__5555555
___5555____55555____55555____5555
5555555555__555______555__5555555555
5555555555_______55_______5555555555
___5555________555555________5555
_____________55$$$55555
___5555________555555________5555
5555555555_______55_______5555555555
5555555555__555______555__5555555555
___5555____55555____55555____5555
__________5555555__5555555
___________55555__$_55555
____________555___$__555
__________________$
___________$$$$___$
__________$$$$$$__$_______$$
_________$$$$$$$$_$____$$
_________$$__$$$$_$__$$$
__________$$$__$$_$_$$_$
___________$$$_$$_$$$_$
___________$$$$__$$$_$$
_____________$$$$$__$_$
______________$$$$$$
<span>__________________$$</span>____________$$$$$$
___________$$$$$$$$
___$$$$$$$__$$$$$$__$$$$$$
__$$$$$$$$$_ $$$$$_ $$$$$$$$
___$$$$$$$$$_$$$$$_$$$$$$$$
____$$$$$$$$_ $$$$_$$$$$$$
________$$$$$_$$$_$$$$$
_$$$$$$$$$_ $____$_$$$$$$$$$
$$$$$$$$$$ $______$ $$$$$$$$$$
$$$$$$$$$$$______ $$$$$$$$$$$
_$$$$$$$$$_$_____$_$$$$$$$$$
_________$$$$$_$$$_$$$$$
_____$$$$$$$$_ $$$$_$$$$$$$
____$$$$$$$$$_$$$$$_$$$$$$$$
___$$$$$$$$$_ $$$$$_ $$$$$$$$
____$$$$$$$__$$$$$$__$$$$$$
____________$$$$$$$$_$$
_____________$$$$$$_ $$
______$$$$$_________$$
_____$$$$$$$_______ $$
___$$$$$$$$$$$_____$$
_____ $$$$$$$$$___ $$
________$$$$$$$__$$
__________$$$$$_$$
___________$$$$$$
____________$$$$
_____________$$
____________$$____$$$$$$$
___________ $$___$$$$$$$$$$
___________$$__$$$$$$$$
___________$$_$$$$$$
___________$$_$$$$$
___________$$$$$$
___________$$$$
<span>___________$$
</span>
Ответ:
program a;
var q,w:integer;
begin
write(' Cколько раз повторить?');
readln(q);
for w:=1 to q do
writeln('Привет!');
end.
Объяснение: