понедельник, 18 мая 2020 г.

Информатика. 9 кл. 19.05

Получив на вход натуральное число x, этот алгоритм печатает два числа: a и b. Укажите наименьшее натуральное число, при вводе которого алгоритм печатает сначала 5, а потом  16.
var x, a, b: longint;
begin readln(x); a := 0; b := 1;
while x > 0 do begin
  if x mod 2 > 0 then    a := a + x mod 12
     else   b := b * (x mod 12);
  x := x div 12;
end;
writeln(a); write(b);
        end.

Комментариев нет:

Отправить комментарий