• Предмет: Информатика
  • Автор: SharkKiller16
  • Вопрос задан 2 года назад

Сделать прогу на паскале
Если n четное, то делим на 2, если n нечетное, то 3n+1
Пример: 7->22->11->52->26и т д

Ответы

Ответ дал: ingr
0

Ответ:

var n : integer;

begin

 readln(n);

 if n mod 2 = 0 then writeln(n/2) else writeln(n*3+1);

end.

Объяснение:

пример не понятен, как у тебя получилось 11->52 ?

Вас заинтересует