• Предмет: Информатика
  • Автор: Аноним
  • Вопрос задан 10 лет назад
< >

ПОМОГИТЕ ПОЖАЛУЙСТА ЗАДАЧИ В ПАСКАЛЬ АБС.

1)ДАНО КОЛ-ВО ИНФОРМАЦИИ В БИТАХ ПЕРЕВЕСТИ ЭТО ВСЁ В МЕГАБАЙТЫ!

Ответы

Ответ дал: garfild214
0

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.

Похожие вопросы
Английский язык
2 года назад
Переведите пожалуйста на англ.яз. В России празднуют Рождество не только этот день, но и в течение следующей  за ним недели, которая называется святочной или Святки.  В это время все гуляют, играют,
Русский язык
2 года назад
Подготовить связный рассказ о ДЕЕПРИЧАСТИИ)) (Попрошу написать в кратце, не очень много)
История
7 лет назад
Какое событие XVIII века произошло позже остальных: А) Учреждение Вольного экономического общества Б) Первый раздел Польши В) Присоединение Крыма к России Г) Манифест о вольности дворянства
История
7 лет назад
У якому році відбулось об'єднання північних та південних руських земель князем Олегом
Геометрия
10 лет назад
дано АВ=AD, CB=CD. Доказать: угол В = углу D.
Алгебра
10 лет назад
исследуйте функцию на монотонность f(x)=13-2х/3 Используя результаты сравнитеf(корень5) и f(корень 7)
Химия
10 лет назад
к раствору, содержащему 33,6 г гидроксида калия, прилили раствор, содержащий 19,6 г серной кислоты. вычислите количество вещества и массу образовавшейся соли       нужно срочно!!!!
Математика
10 лет назад
бригада из 4 чел за 28 дней пошили 560комп белья . за сколько дней пошьют 300компле  бригада из 6 человек , если будут работать  з такою самой продуктивностью ??