Есть ответ 👍

Перевести двоичные числа в восьмеричную систему счисления 0,1001111100000; 0,1100010; 11100001011001; 1000010101

139
222
Посмотреть ответы 2

Ответы на вопрос:

Unicorn135
4,6(33 оценок)

0.1001111100000=0,476 0,1100010=0,61 11100001011001=34131 1000010101=1025

  program proga;     var   a: text;       i,j,n,m : byte;         d: string;         sim: char;   begin              write('введите имя текстового файла   ');   {например: "test" он создастся там где находится сама программа }                read(d);                                             assign(a,d);                   rewrite(a);                       write('введите количество строк: n= ');                           readln(n);                       write('введите количество символов в строке: m= ');                           readln(m);                                         for i: =1 to n do                      begin                            sim: =chr(ord('1')+i-1);                             for j: =1 to m do                                write(a,sim);                                 writeln(a);                       end;                             close(a); end.      

Популярно: Информатика