PascalABC. Заданное число либо уменьшается ** 1, либо делится пополам если оно четное....

0 голосов
61 просмотров

PascalABC. Заданное число либо уменьшается на 1, либо делится пополам если оно четное. Нужно получить 1 за наименьшее количество действий, напишите программу


Информатика (21 баллов)
Дан 1 ответ
0 голосов
Одаренный (1.1k баллов)

Ответ на фото
Пример работы программы тоже на фото.

Приношу извинения за неудобства


image
image
оставил комментарий (21 баллов)

Можешь написать команду, которой показывается за сколько действий было сделано число 1

оставил комментарий Одаренный (1.1k баллов)

После Writeln('введите чисисло') пиши строку: g:=0;

оставил комментарий Одаренный (1.1k баллов)

после "begin;" (перед IF) пиши строку: g:=g+1;

оставил комментарий Одаренный (1.1k баллов)

В конце, перед readln(a) пиши строку: writeln('Действий было сделано ',g);

...