Предмет: Информатика,
автор: Dekazerr
Напишите на языке Паскаль, чтоб было все понятно, пожалуйста)
Помогите пожалуйста решить задачу.Когда Василисе Прекрасной исполнилось 18 лет, Кощей Бессмертный решил взять её замуж. Василиса спросила, сколько у Кощея сундуков с золотом. Кащей сказал, что у него 27360 сундуков полных золота, и каждый год прибавляется еще по 33 сундуков. Василиса обещала выйти за Кащея тогда, когда у него будет 30000 сундуков полных золота. Сколько лет будет невесте Кощея в день свадьбы?
Ответы
Автор ответа:
3
PascalABC.NET
begin
var age_V := 18;
var chests := 27360;
while chests < 30000 do begin
chests += 33;
age_V += 1;
end;
print('Невесте будет:', age_V, 'лет')
end.
Приложения:
![](https://files.topotvet.com/i/8e3/8e384ce7519bcaca6799736b98dbc90d.png)
Dekazerr:
Спасибо!
Похожие вопросы
Предмет: Русский язык,
автор: Vassa2002
Предмет: Русский язык,
автор: pro100sss
Предмет: Українська мова,
автор: Amina2012
Предмет: Химия,
автор: Moerchuk2015