Информационный объём дискеты равен 1, 44 Мбайта. Рассчитайте и выведите на экран сколько книг может поместиться на дискету, если для хранения кода одного символа нужен 1 байт. Количество страниц в книге, число строк на страни...
Информационный объём дискеты равен 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.
Не нашли ответ?
Похожие вопросы