Var
text : string;
i : integer;
begin
write('Введите текст: ');
readln(text);
write('Результат: ');
for i := length(text) downto 1 do
write(text[i]);
<span>end. </span>
1)110-7=103(количество человек,знающих один из языков)
2)103-87=16(количество человек,знающих только испанский язык)
3)75-16=59(количество человек,знающих оба этих языка)
Ответ:59 человек знают оба этих языка.
<em>Если вы имели в виду, что мощность алфавита = 64, то:</em>
Дано:
K = 20
N = 64
Решение:
N = 64 => i = 6;
I = K * i
I = 20 * 6 = 120(бит)
Ответ: I = 120 бит.
<span>программе Excel поиск 25 в количество</span>
Блок-схема решения задачи 2 - в прилагаемом файле.