1 байт = 8 бит
1 Кбайт = 1024 байт
1 Мбайт = 1024 Кбайт
1 ГБ = 1024 МБ
1 бит = 0,00012 Кбайт
1 Мбайт = 1048576 байт
1 байт = 8 битов
128 битов = 16 байт
32 байт = 256 бит
1 Кбайт = 1024 байт
1,5 Кбайт = 1536 байтов
2048 байт = 2 Кбайт
81 920 битов = 10 Кбайт
2 Мбайт = 2048 Кбайт
1,5 Мбайт = 1572864 байтов
а потом сам(а)
Важный пункт главного меню
Var p,i, n:integer;
begin
p:=1;
writeln('Введи n');
readln(n);
if n>=1 then
begin
for i:=1 to n do
p:=p*i;
writeln(p);
end else writeln('n>=1');
<span>end.
</span>
Алг
нач
цел i,s
s:=0
нц для i от 20 до 50
s=s+i
кц
вывод s
кон
program shegor2003;
var a:array[1..10] of integer;
i, temp:integer;
begin
for i:= 1 to 10 do
a[i]:=random(11);
writeln('Исходный массив:');
for i:= 1 to 10 do
write(a[i]:3, ' ');
writeln;
temp:=a[1];
a[1]:=a[10];
a[10]:=temp;
writeln('Преобразованный массив:');
for i:= 1 to 10 do
write(a[i]:3, ' ');
end.