Решите Пожалуйста!!! Желательно на языке ПАСКАЛЬ!!
Ответы:
24-10-2018 13:26
Var n,x,k: integer; d: real;begin read(n, x); k := 1; d := n; while d < x do begin k := k + 1; d := d * 1.1 end; write(k)end.
Также наши пользователи интересуются:
Через сколько дней у бобов вырастают предаточные корни(1 / 5a + 1 / 7a) × a^2 / 8 при a = -4,2
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Решите Пожалуйста!!! Желательно на языке ПАСКАЛЬ!!» от пользователя Женя Антоненко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!