Составить программу в которой вычисляется произведение двух функций y=2sin3x и z= ! ​

Var  s: string;   i, j, n: integer;   c: char;   flag: boolean; begin  write('введите произвольное число: '); readln(s);   flag : = false;   n : = length(s);   i : = 1;   while (i < = n) and (not flag) do  begin      c : = s[i];       j : = i + 1;       while (j < = n) and (not flag) do          if s[j] = c then flag : = true else j : = j + 1;       if (not flag) then i : = i + 1  end;   if flag then writeln('символ "', c, '" встречается больше одного раза')  else writeln('все символы уникальны')end.тестовое решение: введите произвольное число: -1453.5462символ "4" встречается больше одного раза

ответ:

6030

объяснение:

c18 в 16-ричной системе состоит из 3 чисел: c 1 8.

8 - 1 в десятичной (16 в 0 степени)

1 - 16 в десятичной (16 в 1 степени)

c(12) - 256 в десятичной (16 в 2 степени)

работает это по принципу разложения в десятичной системе счисления, когда мы работаем со степенями десяти, только сейчас это степени 16.

перемножаем эти числа и складываем:

8*1+1*16+12*256 = 3096 (в десятичной системе счисления).

теперь переводим в 8-ную систему:

максимальная степень 8 которая меньше 3096 это 512(8 в 3 степени)

значит число будет состоит из n(в нашем случае 3)+1 чисел => из 4 чисел, причем правое разрядовое число будет равно 3096 div 512 равно 6.

остаток от деления 24. понижаем степени восьми с 3 степени до 2. 64 больше чем 24, поэтому следующее число после 6 равно 0.

теперь степень равна 1. восемь меньше 24, поэтому делим 24 на 8 и получаем разрядовое число. 24 div 8 = 3 без остатка => следующие 2 числа равны 3 0

соединяем все 4 числа и получаем 6030