Информационное сообщение объёмом 0, 125 кбайт содержит 512 символов. сколько «весит» один символ этого сообщения?

0,125  кбайт=128 байт 128 байт = 1024 бит 1024/512=2  ответ: один символ данного сообщения "весит" 2 бита.

а), б)

var a, b, c: char;

begin

  writeln('введите 3 символа');

  readln(a, b, c);

  writeln('результат сцепления: ', a+b+c);

  if a> b then writeln(a,'> ', b);

  if a> c then writeln(a,'> ', c);

  if a=b then writeln(a, '=', b);

  if a=c then writeln(a, '=', c);

  if a< b then writeln(a, '< ', b);

  if a< c then writeln(a, '< ', c);

  if b> c then writeln(b, '> ', c);

  if b< c then writeln(b, '< ', c);

end.

в)

var a, b: char;

begin

  writeln('введите 2 символа');

  readln(a, b);

  if a> b then writeln(b,'   ', a);

  if a< b then writeln(a,'   ', b);

  if a=b then writeln(a,'   ', b);

end.

   

   

составить алгоритм нахождения произведения целых нечетных чисел от 1 до 100.

 

извини, я на украинском не могу)

 

буду приводить аналогию на паскале.

 

в основе будет лежать "двойной" цикл. (for i: =1 to 100 do for j: =1 to 100

 

в первом цикле мы проверяем делится ли "i" на 2 (if i mod 2=0).

если да(четное), тогда берем след число. если нет(нечет), то запускаем второй цикл:

(for j: =1 to 100)

 

в нем мы тоже проверяем число на нечетность. если число нечетное, тогда у нас есть уже 1ое произведение! "i" - это первый множитель. "j" - второй. i*j - само произведение. его можно вывести на экран (writeln(i*

 

получается мы берем по-порядку каждое число от 1 до 100,   если оно нечетное, тогда по очереди умножаем его на каждое нечетное число, опять же, от 1 до 100.

 

на паскале:

 

for i: =1 to 100 do

  if i mod 2< > 0 then

  for j: =1 to 100 do

    if j mod 2< > 0 then writeln(i*j);

 

могут встречаться повторы (3*9 и 9*3)