Царь Кощей все свои богатства разместил в швейцарском банке. Ему обещали, что каждый год он будет получать прибыль 13%. Сколько лет придется прожить Бессмертному, чтобы накопить на личный самолет? Написать программу используя д...
Царь Кощей все свои богатства разместил в швейцарском банке. Ему обещали, что каждый год он будет получать прибыль 13%. Сколько лет придется прожить Бессмертному, чтобы накопить на личный самолет?
Написать программу используя данные строчки кода:
var
Begin
End
Writeln
Readln
While … do
Repeat … until
Гость
Ответ(ы) на вопрос:
Гостьprogram Money;
var
n: integer;
m, need: real;
begin
writeln('Введите кол-во денег Кощея');
readln(m);
writeln('Введите стоимость самолёта');
readln(need);
while m < need do begin
m := m + 0,13 * m;
inc(n);
end;
writeln('Нужное кол-во лет - ', n);
end;
Не нашли ответ?
Похожие вопросы