Программа просит числитель и знаменатель обеих дробей через пробел и выдает произведение
2^i=29 i=5бит 1 один номер весит 5*6= 30 бит 30/8=4байта
4*40=160байт
BEGIN
Ввести число N, проверить, что оно 4-значное.
read(N);
if (N >= 1000) and (N <= 9999) then
begin
Найти 2 цифру
A2 = Int(N / 100) Mod 10;
Найти 4 цифру
A4 = N Mod 10;
Сравнить их
if A2 > A4 then write "Вторая цифра больше, чем четвертая";
if A2 < A4 then write "Вторая цифра меньше, чем четвертая";
if A2 = A4 then write "Вторая цифра равна четвертой";
else
write "Число должно быть 4-значным!";
end;
Конец
END.
Program hhh54;
var i,s: longint;
begin
s:=0;
for i:=10 to 99 do
if i mod 2 <> 0 then s:=s+i;
write (s);
end.
N=32
N=2^i(два в степени i)
32=2^i
i=5
K=256 (на одной табличке)
I=K*i
I=256*5=1280 бит =1,25 байт хранится на каждом носителе
1280*512=655360 бит=640 байт заключено во всем своде законов