1024 бит=128 байт
1024/64=16
х=16
В-3
О-16
Д-5
О-16
Л-13
А-1
З-9
К-12
А-1
<span>ВОДОЛАЗКА</span>
Var i,k : integer;
a: array[1..10] of integer;
Begin
for i := 1 to 10 do begin
a[i] := random(7) + 3;
if a[i] = 4 then k:= k + 1;
end;
writeln(k);
End.
Потому, что краснй цвет означает радость. Радость потому, что Христос Воскрес!