80 . инфоматика 7 класс записывать ответ вместе с дано. 1. монография, на­бран­ная на компьютере, со­дер­жит 2048 страниц, на каж­дой стра­ни­це 48 строк, в каж­дой стро­ке 72 символа. для ко­ди­ро­ва­ния сим­во­лов ис­поль­зу­ет­ся ко­ди­ров­ка unicode, при ко­то­рой каж­дый сим­вол ко­ди­ру­ет­ся 16 битами. опре­де­ли­те ин­фор­ма­ци­он­ный объём монографии. 2. статья, набранная на компьютере, содержит 4 страницы, на каждой странице 40 строк, в каждой строке 64 символа. определите информационный объём статьи в одной из кодировок  unicode, в которой каждый символ кодируется 16 битами. 3. статья, набранная на компьютере, содержит 32 страницы, на каждой странице 32 строки, в каждой строке 30 символов. определите информационный объём статьи в кодировке кои-8, в которой каждый символ кодируется 8 битами. 4. ученик на­би­ра­ет сочинение по ли­те­ра­ту­ре на компьютере, ис­поль­зуя кодировку koi-8. опре­де­ли­те какой объём па­мя­ти займёт сле­ду­ю­щая фраза:   молекулы со­сто­ят из атомов!   каждый сим­вол в ко­ди­ров­ке koi-8 за­ни­ма­ет 8 бит памяти. 5. в кодировке  windows-1251 каждый символ кодируется одним байтом. определите информационный объём следующего предложения в данной кодировке:   чернила на 99% состоят из воды.

I=2048*48*72*16 = (посчитаешь)

Если надо в байты перевести , но раздели на 8

Если в Кбайты на 1024 раздели )

Всего символов: 72*48*2048=7077888 (символов)

Умножим все символы на количество бит одного символа:

7077888 * 16 = 113246208 (бит) - информационный объем монографии в битах.

Переведем биты в Байты, Кбайты и Мбайты:

1 Байт = 8 бит

1 Кбайт = 1024 Байт

1 Мбайт = 1024 Кбайт

=>

113246208 / 8 = 14155776 Байт

14155776 / 1024 = 13824 Кбайт

13824 / 1024 = 13,5 Мбайт

ответ 4) 13,5 Мбай­та

Объяснение:

Вывести числа от 1 до 20 и от 20 до 40 так же, просто цифры поменяй.
var
i:integer;
begin
writeln('1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20');
readln
end.

Вывести квадраты чисел от 1 до 10
var   
i: integer;
begin    
for i:=1 to 10 do      
writeln(i:4,'   ',sqr(i):4);    
readln
end.

Число n вводят с клавиатуры.Напечатать n раз число 5 (и оставшиеся 2 задачи можно этой же, просто поменяй кое-какие детали, подумай какие)
var
i,n:integer;
begin
writeln('Введите кол-во повторов числа: ');
readln(n);
for i:=1 to n do
writeln('5');
readln
end.

/** libraries */

#include <iostream>

#include <cmath>

#include <vector>

#include <map>

#include <set>

#include <queue>

#include <stack>

#include <algorithm>

/** libraries */

using namespace std;

/** defines */

#define ll long long

#define ld long double

#define yes cout << "YES" << "\n"

#define no cout << "NO" << "\n"

/** defines */

ld func1(ld x, ld y, ld z){

   return 5 * atan(x) - (1/4) * acos(x) * ((x + 3 * abs(x-y) + pow(x,2))/(abs(x-y) * z + pow(x,2)));

}

ld func2(ld x, ld y, ld z){

   return (pow(M_E,abs(x-y)) * pow(abs(x-y),x+y))/(atan(x)+atan(z)) + pow(pow(x,6) + pow(log(y),2),(1/3));

}

signed main() {

   ios_base::sync_with_stdio(false);

   cin.tie(nullptr);

   cout.tie(nullptr);

   ld x,y,z;

   cin >> x >> y >> z;

   cout << func1(x,y,z) << "\n" << func2(x,y,z);

}

P.S если я где-то косякнул по невнимательности, то пишите, исправим