Информатика, опубликовано 2018-08-22 19:32:34 by Гость
ПОМОГИТЕ ПОЖАЛУЙСТА ЗАДАЧИ В ПАСКАЛЬ АБС. 1)ДАНО КОЛ-ВО ИНФОРМАЦИИ В БИТАХ ПЕРЕВЕСТИ ЭТО ВСЁ В МЕГАБАЙТЫ!
Ответ оставил Гость
Program pr;
uses crt;
Var bit,MB:real;
Begin
Writeln(Введите кол-во бит);
readln(bit);
MB:=bit/8/1024/1024;
Writeln(bit, bit=,MB:5:4, MB);
readln;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на