4) кроме первого все неверно.
правильно так:
C:=DS;
game1:=30; (имя переменной не может начинаться с цифры)
a:=c=5; (a - логическая переменная)
5)a=8;
Вот так как-то.
Олимпиада? Я тоже ее пишу, эту задачу решил. Как насчет обмена ответами?
<em>1.</em>
var
i: integer;
A: array [1..20] of integer;
begin
randomize;
writeln('Массив: ');
for i:=1 to 20 do A[i]:=random(21)-10;
for i:=1 to 20 do write(A[i]:5);
writeln;
writeln('Каждый пятый эелемент массива: ');
for i:=1 to 20 do if i mod 5 = 0 then write(A[i]:5);
end.
<span>
</span><em>2.</em>
var
x,i: integer;
A: array [1..20] of integer;
begin
randomize;
writeln('Массив: ');
for i:=1 to 20 do A[i]:=random(11);for i:=1 to 20 do write(A[i]:5);
writeln;
writeln('Натуральные числа в диапазоне [5..10]: ');
for i:=5 to 10 do write(A[i]:5);
writeln;
x:=1;
writeln('Их произведение: ');
for i:=5 to 10 do x:=A[i]*x;
write(x:5);
end.
Без понятия что за форма дано найти
256 = 2^8 т.е 8 бит на символ
8*30*12*х = 177550*8 бит
х =177550*8 /8/30/12 = 493.194444444444 символов в строке в среднем
Общее количество символов для записи номеров = 22+22+10=54
Для кодирования одного символа необходимо log(2)54 ≈ 6 бит (2^6 = 64).
Для записи одного номера требуется 7*6 бит = 42 бита = 42/8 байт ≈ 6 байтДля хранения 50 номеров потребуется 50*6 байт = 300 байт