avast!
Dr.Web 360 Total Security Kaspersky
Panda Free Antivirus
Norton Internet Security
ESET NOD32 Smart Security
F—Secure Internet Security
Bitdefender Internet Security
AVG Internet Security
Vara,b,sum:real;beginread(a,b);sum:=0;sum:=abs(a-b);write(sum);end.
Program n_1;
var n,count:integer;
Begin
Write('введите натуральное полож.число n -');
read(n);
count:=0;
While n>0 do
Begin
n:=n div 10;
count:=count+1;
end;
write(count);
End.
Попробуй эту программу
256 мегабайт-2048000000 бит=2.048e+9
256 мегабайт=256000000 байт=2.56e+8
256 мегабайт=256000 килобайт