Есть ответ 👍

7. В одному рукописі х сторінок, а в іншому – у сторінок. За скільки днів редактор може прочитати обидва рукописи, якщо щодня читатиме по 70 сторінок?

142
464
Посмотреть ответы 1

Ответы на вопрос:


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.

Популярно: Информатика