256*30*64*5=2457600бит/8=307200байт/1024=300мбайт
Сист по нужно для начала работы с устройством
Program z1;
var x:integer;
y:real;
begin
Writeln('Введите x');
readln(x);
y:=1/(x-15);
writeln(x:5:2);
readln;
end.
Если в двоичном коде то
1101100
// PascalABC.NET 3.2
begin
var n:=readInteger;
Writeln('десятки ',n div 10,' единицы ',n mod 10)
end.