7. В одному рукописі х сторінок, а в іншому – у сторінок. За скільки днів редактор може прочитати обидва рукописи, якщо щодня читатиме по 70 сторінок?
142
464
Ответы на вопрос:
program million;
var k,p,v:real;
g:integer;
begin
write('Введите количество долларов в банке ');
readln(k);
writeln('Введите процент годовых в банке ');
read(p);
g:=0;
v:=k;
while v<1000000 do
begin
v:=v+v*p/100;
g:=g+1;
end;
writeln('Через ',g,' лет вы станете миллионером')
end.
Популярно: Информатика
-
Nastena1110200305.10.2021 00:16
-
Princesska8827.02.2022 10:28
-
катринвесна8831.03.2021 05:28
-
nastya19042021.07.2022 01:48
-
оуоуо12.01.2022 01:47
-
goddessshi26.11.2022 07:23
-
кал1202.04.2021 08:35
-
влада40915.03.2023 04:03
-
sprikutviktpria16.03.2021 17:07
-
АнимешницаВикуля77707.08.2020 03:51