У исполнителя Альфа две команды, которым присвоены номера: 1) прибавь 1; 2) раздели на b. Известно, что программа 11211 переводит число 20 в число 13. Определите значение b. help

145

500

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

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

Lunitoes

Информатика

4,4(66 оценок)

(20 + 1 + 1) / b + 1 + 1 = 13

22 / b + 2 = 13

22 / b = 11

b = 22 / 11

b = 2 - ответ.

Aleksandrall

Информатика

4,6(93 оценок)

Program test; const max = 10; //последний член последовательности var i, m, proizv: integer; bol: boolean; arr: array[1..max] of integer; begin proizv : = 1; bol : = false; write('введите м: '); readln(m); writeln(); for i: = 1 to max do begin arr[i] : = i; if (arr[i] > m) then begin proizv : = proizv * arr[i]; bol : = true; end; end; if (bol = false) then writeln('элементов больше числа м нет! ') else writeln('произведение = ', proizv); end.