Напишите программу. Массив состоит из 8 элементов. Его необходимо заполнить рандомными числами от 0 до 1. Вывести на экран сначала элементы массива = 0, а потом =

1 текст:     

 

(Буква)      (Десятичный код)     (код)

 

 

    С                      243                            11110011

     у                      213                            11010101

    а                      193                             11000001

                           206                            11001110

   ( - )                    45                              00101101

                           208                            11010000

    а                      193                             11000001

                          206                             11001110

 

 

 

2 текст:         (Англ.яз)

 

 

(Буква)            (Десятичный код)     (Двоичный код)

 

 

   I                         73                                01001001 

  B                        66                                01000010

  M                        77                                01001101

 

 

 

 Примечания: ответы даны на ПОКАЗАННЫЕ Вами буквы и знаки.

( - )  - обозначение дефиса.

Английские буквы не кодируются в КОИ-8, используют (не беспокойтесь, это совершенно правильный подход).

// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!

uses NumLibABC;

begin
   var (num,denom):=ReadInteger2('Числитель и знаменатель 1-й дроби:');
   var f1:=Frc(num,denom);
   (num,denom):=ReadInteger2('Числитель и знаменатель 2-й дроби:');
   var f2:=Frc(num,denom);
   f1.Print; Write('* '); f2.Print; Write('= '); (f1*f2).Print
end.

Примеры
Числитель и знаменатель 1-й дроби: 4 9
Числитель и знаменатель 2-й дроби: 3 8
4/9 * 3/8 = 1/6

Числитель и знаменатель 1-й дроби: 32432424 10213133
Числитель и знаменатель 2-й дроби: 23123 12313123
32432424/10213133 * 23123/12313123 = 749934940152/125755562844359

Числитель и знаменатель 1-й дроби: 15 2
Числитель и знаменатель 2-й дроби: 8 15
15/2 * 8/15 = 4