Информационный объём дискеты равен 1, 44 Мбайта. Рассчитайте и выведите на экран
сколько книг может поместиться на дискету, если для хранения кода одного символа
нужен 1 байт. Количество страниц в книге, число строк на странице и количество
символов в строке запрашивайте у пользователя.
помогите решить через паскаль
Program e;
var d : real; x,y,z : integer; all : integer;result: real;beginWriteln(ко-лво страниц);Readln(x);Writeln(ко-лво строк);Readln(y);Writeln(ко-лво символов);ReadLn(z);
d:= 1.44 * 1024;
all := x*y*z;
result := d/all;writeln(Поместится книг:,trunc(result)); end.
Оцени ответ
