Предмет: Информатика, автор: ямалк

Pascal.
Банковский вклад равен 2500 руб. Процентная ставка 19 процентов годовых. Через сколько лет банковский вклад станет 5000 рублей.
Требуется помощь, Учитель темы не объясняет


ямалк: Мы не разбирали еще задачи через оператор goto
Аноним: А Вы их, скорее всего. и не будете разбирать, потому что Паскаль так построен, что позволяет их не использовать НИКОГДА.
Аноним: Переходы вперед заменяются обходом блоков if-then-else, переходы назад не нужны благодаря наличию операторов цикла разных видов.
ямалк: Нам учитель дал образец на который опираться,но программа учителя не работает *-*
Аноним: var s:real; n:integer; begin s:=2500; n:=0; repeat s:=1.19*s; Inc(n) unlil s>=5000; Writeln(n) end. - это и вся программа
cerfcerfcerfcerf: Alviko Здравствуйте. Можете мне помочь с http://znanija.com/task/11191626
Аноним: Там, описка, until должно быть
Аноним: И ответ будет 4 (года).
ямалк: Ничего не поняла, не могли бы написатьв ответе полную программу?
Аноним: Это и есть полная)))

Ответы

Автор ответа: Аноним
1
var
  s: real;
  n: integer;

begin
  s := 2500;
  n := 0;
  repeat
    s := 1.19 * s;
    Inc(n)
  until s >= 5000;
  Writeln(n+1)
end.

Тестовое решение:
5



Аноним: Подправил. Надо выводить n+1, поскольку n - последний год, в который сумма НЕ ДОСТИГНЕТ 5000
ямалк: и как тогда будет целиком?
Аноним: Так, как написано! Вы же не думаете, что тут может находиться неверный ответ!
Аноним: Если будете на этом сервисе кому-то решать задачи, когда получите статус "Главный мозг", поймете, почему если мы и делаем когда-то ошибки, то сами же их и исправляем.
ямалк: Ниче не поняла
Аноним: Вы просили программу - Вы её получили. Она работает и выдала Вам ответ. А если Вы не понимаете, как она работает, то это это совсем иное: тут не курсы по изучению программирования, тут решаются конкретные задачи даются ответы на конкретные вопросы.
ямалк: Тише. Тише
Похожие вопросы
Предмет: Английский язык, автор: Акакий111111383
Предмет: Русский язык, автор: axmedpro222