Есть ответ 👍

Переведите десятичные дроби в троичную и симметричную систему счисления с точностью до 5 знаков а 0,52 б 0,31​

165
200
Посмотреть ответы 1

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


Ну во-первых  max: =a[1]; нужно задать после того как массив готов! а вместо этого  for i: =(1+b) to (n+b) do begin if a[i] = max then begin a[i+1]: =a[i]; a[i]: =-5; b: =b+1; end else a[i]: =a[i+b]; end; попробуй это   b: =-50;   for i: =1 to n do     if a[i]: =max then a[i]: =a[i]+b;

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