Написать программу в pascal, которая бы решала : дано целое число a> 1. найдите наименьшое целое неотрицательное q, при котором 5^q> a.

250

401

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

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

веранастякрас

Информатика

4,8(16 оценок)

Var a,q: integer; begin readln(a); for q: =1 to a do if power(5,q)> a then begin write(q); break; end; end.

Levkoi

Информатика

4,7(27 оценок)

Пусть х - число шагов вперед, тогда х+4 - число шагов назад х+х+4=40 2х=36 х=18 тогда кузнечик продвинулся на 18*5=90 вперед и на 22*3=66 назад. он оказался в 90-66=24 шагах от а вперед. значит, ему надо сдвинуться назад на 24/3=8 ответ: 8 шагов назад