Если вы имели в виду азбуку морзе, то вы расшифровали неправильно, так как "и" на азбуке морзе - "**", а тут первые два символа - "-*"
12кб =12 288 байт = 98 304 бит
Такие дела
Uses crt;
var i,n:integer;
begin
readln(n);
for i:=1 to 9 do
writeln(i,'x',n,'=',i*n);
end.
Var
n, i, k: integer;
f: boolean;
begin
readln(n);
f := false;
for i := 1 to n do
begin
k := Random(100);
f := f or (k mod 4 = 0);
end;
writeln(f);
end.
Если не показывабют число значит оно умножено на 0
а) 10010
б) 1030200