Вроде N=2i (только i должна быть маленькой в верху)
#1.
var n,i,flag:integer;
begin
readln (n);
flag:=0;
while n>0 do
begin
i:=n mod 10;
n:=n div 10;
flag:=flag+1;
end;
if (flag = 2)
then writeln ('Это число двузначное')
else
writeln ('Число не является двузначным');
end.
#2.
var n:integer;
begin
readln (n);
if (n mod 2 = 0) then
writeln ('Это число четное')
else
writeln ('Число не является четным');
end.
1.25 кб=1280 байт
байт=8 бит
1,25 кБ=10240 бит
В 10240 бит вместилось 2048 символов, потому что 10240 бит/2048 символов=5 бит/символ. 2^5=32
в итоге ответ: мощность алфавита 32 бита
Готово...........................
Шнур к интернэту
и подключаешь в компьютер!