Program one;
var: a: real;
begin
Writeln ('Введите число');
readln (a);
If a<0 then else a:=a+1 else writeln (a)
end.
Вроде так
<span>- 715http://calculatori.ru/perevod-chisel.html2 </span>
27(10)=17
4f(16)=117
Там делить нужно столбиком дели на 16 и все получиться :3
<span>1) 2000022 бит = 250002.75 байт = 244.14 Кбайт
2) 3</span>