Program fantscrin;
const n = 17;
Var a: array [1..n] of integer;
i,s:integer;
Begin
for i:=1 to n do
a[i]:=random(20);
for i:=1 to n do
write(a[i],' ');
s:=0;
for i:=1 to n do
if(a[i] > 5) then s:=s+a[i];
writeln('');
write('Сумма: ',s);
End.
32=2^6 => Для русского языка 1 символ несет 6 бит инфы.
26=2^i => i = log 26 по основанию 2 = 4,7 бит => Для фр. языка 1 символ несет 4,7 бит инфы.
V информации = 10 * 6 бит = 60 бит (для русского языка)
V информации = 10 * 4,7 бит = 47 бит (для фр. языка)
Значит для русского языка сообщение из 10 знаков несет больше информации.
Program z1;
Var c,i:integer;
Begin
Read (n,i);
If not(c=2) then
For i to 0 do
begin
c:=c+1;
i:=i-2;
end;
writeln(n);
end.
Ответ:
1
Объяснение:
Объяснения не просили, я и не буду писать.
Таня нашла старый калькулятор со стертыми клавишами алгебраических операций сложения,вычитания,умножения и деления(столбец D).Последовательно набравB2 A2D4 A3 C1 D3 A2 C3 C4,ОНА ПОЛУЧИЛА 30Какое число получит Таня в результате ,если наберет B3 A1 D1 A3 D4 A3 C2 C4