60 пользователь вводит формулу, состоящую из двух цифр и одного из знаков операций (< +> , < - > , < * > , > ). например: 5+8. каждый символ вводится с новой строки. выведите словесное описание этой формулы (пять плюс восемь). нужно использовать оператор case.

program kontr;

var a,b: integer;

      c: char;

      n,m: string;

begin

writeln ('введите первую цифру');

readln(a);

writeln ('введите вторую цифру');

readln(b);

writeln ('введите один из знаков: +*,/');

readln(c);

case a of

0: n: ='ноль';

1: n: ='один';

2: n: ='два';

3: n: ='три';

4: n: ='четыре';

5: n: ='пять';

6: n: ='шесть';

7: n: ='семь';

8: n: ='восемь';

9: n: ='девять';

end;

case b of

0: m: ='ноль';

1: m: ='один';

2: m: ='два';

3: m: ='три';

4: m: ='четыре';

5: m: ='пять';

6: m: ='шесть';

7: m: ='семь';

8: m: ='восемь';

9: m: ='девять';

end;

case c of

'*': writeln (n,' умножить на ',m);

'/': writeln (n,' разделить на ',m);

'+': writeln (n,' плюс ',m);

'-': writeln (n,' минус ',m);

end;

end.

1. 1,5 Кбайт

2. 8 бит

Объяснение:

1.

N = 2^i

N - мощность алфавита (количество символов в алфавите)

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

N = 64 символа

i = 6 бит (64 = 2^6)

I = K * i

I - информационный объём сообщения

K - количество символов в сообщении

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

K = 2048 символов

I = 2048 * 6 = 12288 бит

12288 бит = 12288 / 8 = 1536 байт (1 байт = 8 бит)

1536 байт = 1536 / 1024 = 1,5 Кбайт (1 Кбайт = 1024 байт)

2.

I = K * i

I = 32 Кбайт = 32 * 1024 = 32768 байт = 32768 * 8 = 262144 бит

K = 32768 символов

i = I / K

i = 262144 / 32768 = 8 бит

8 бит = 1 байт