svetegal
?>

Перевести из Pascal на язык C++ program junk;uses crt;var m, d:byte;beginclrscr;writeln('Введите дату рождения в формате дата <Enter> месяц (пример 12 <Enter> 02) ');readln(d, m);textcolor(red);case m of1: if d<20 then writeln('Козерог') else writeln('Водолей');2: if d<19 then writeln('Водолей') else writeln('Рыба');3: if d<21 then writeln('Рыба') else writeln('Овен');4: if d<20 then writeln('Овен') else writeln('телец');5: if d<21 then writeln('Телец') else writeln('Близнецы');6: if d<22 then writeln('Близнецы') else writeln('Рак');7: if d<23 then writeln('Рак') else writeln('Лев');8: if d<23 then writeln('Лев') else writeln('Дева');9: if d<23 then writeln('Дева') else writeln('Весы');10: if d<23 then writeln('Весы') else writeln('Скорпион');11: if d<23 then writeln('Скорпион') else writeln('Стрелец');12: if d<22 then writeln('Стрелец') else writeln('Козерог')end;readlnend.​

Информатика

Ответы

Li-111

Обычно, для обозначения кол-ва символов используют символ k, но у меня это n, а для объёма информации - I, у меня - V

Для решения данной задачи нужно знать всего две простые формулы:

N = 2^{i}, где N - мощность алфавита (кол-во букв в сообщении),

                    i - информационный вес символа

V = n*i, или более общая формула:

I = k*i , где k - кол-во символов в сообщении

                       I - кол-во информации в тексте (Объём)

А ещё, что 1 байт = 8 бит

Дано:            |     Решение:

N = 32           |      N = 2^{i},  32 = 2^{i},  i = 5 бит (Так как 2^{5} = 32)

n = 8*35*48  |      V = n*i,  V = 8* 35*48 * 5 бит = 2^{3} * 35* 2^{4}*3*5 бит

V - ?                      

V = \frac{2^{3} * 35* 2^{4}*3*5}{8} = \frac{2^{3} * 35* 2^{4}*3*5}{2^{3}} = 35* 2^{4}*3*5 (байт) = 8400 байт

V = 8400 байт

                                                                                     ответ: 8400 байт

Дополнительные вычисления:

8 | 2\\4 | 2\\2 | 2\\ 8 = 2^{3}

48 | 2\\24 | 2\\12 | 2\\6 | 2\\3 | 3\\1\\48 = 2^{4} *3

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Перевести из Pascal на язык C++ program junk;uses crt;var m, d:byte;beginclrscr;writeln('Введите дату рождения в формате дата <Enter> месяц (пример 12 <Enter> 02) ');readln(d, m);textcolor(red);case m of1: if d<20 then writeln('Козерог') else writeln('Водолей');2: if d<19 then writeln('Водолей') else writeln('Рыба');3: if d<21 then writeln('Рыба') else writeln('Овен');4: if d<20 then writeln('Овен') else writeln('телец');5: if d<21 then writeln('Телец') else writeln('Близнецы');6: if d<22 then writeln('Близнецы') else writeln('Рак');7: if d<23 then writeln('Рак') else writeln('Лев');8: if d<23 then writeln('Лев') else writeln('Дева');9: if d<23 then writeln('Дева') else writeln('Весы');10: if d<23 then writeln('Весы') else writeln('Скорпион');11: if d<23 then writeln('Скорпион') else writeln('Стрелец');12: if d<22 then writeln('Стрелец') else writeln('Козерог')end;readlnend.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

aninepp
detymira
Роман_Гречина
Viktoromto
irinalav2705745
platonovkosty
Сергей_Комарова899
hbqhzwtd
de1979nis
azarovaelena19812
cochana
kapitan19
rimmatrotskaia303
kotocafe45
Zhanna417