267810/3=89270 остаток 0
89270/3=29756 ост.2
29756/3=9918 ост.2
9918/3=3306 ост.0
3306/3=1102 ост.0
1102/3=367 ост.1
367/3=122 ост. 1
122/3=40 ост. 2
40/3=13 ост. 1
13/3=4 ост 1
4/3=1 ост1
<span>267810</span>₁₀=111121100220₃
Program prog;
Uses crt;
var a: array [1..5] of integer;
i,k: integer;
begin
clrscr;
for i:=1 to 5 do
begin
write('a[',i,'] = ');
readln(a[i]);
if (a[i]<>0) then
inc(k);
end;
writeln;
write('k = ', k);
end.
Var a,b,c,d:real;
begin
writeln('Первое число');
readln(a);
writeln('Второе число');
readln(b);
writeln('Третее число');
readln(c);
d := a + b + c;
writeln('Ответ:',d)
end.
Начало и конец программы в овале, действия в квадратах. Программа совершается последовательно
Ответ:
5 бит, 32 символа
Объяснение:
Вычислим количество символов в сообщении.
6 * 40 * 60 = 14400
Вес сообщения: 9000 байт = 9000*8 бит = 72000 бит
Значит, на один символ приходится 72000 / 14400 бит = 5 бит.
Количество символов в алфавите равно 
.
