Сумма 10000 рублей положена в сберегательный банк, при этом прирост составляет 5% годовых. составьте алгоритм, определяющий, через какой промежуток времени первоначальная сумма увеличится в два раза.
Вот конкретно алгоритм. Где: i-промежуток времени(в годах). То, что мы и ищем min-сумма вклада max-сумма, до которой осуществляется рост(в нашем случаи min*2) pr-процент прироста
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016 function IsPrime(n:integer):boolean; begin Result:=Range(2,Round(sqrt(n))).All(i->n mod i<>0) end;
begin var n:=9; var a:=MatrixRandom(n,n,3,15); var k:=0; for var i:=0 to n-1 do begin for var j:=0 to n-1 do begin Write(a[i,j]:3); if IsPrime(a[i,j]) then Inc(k) end; Writeln end; Writeln('Простых чисел: ',k) end.
Параметры моделирования: 1. Классификация текстового документа 2. Основные понятия 3. Создание текстового документа Ход работы 1. Текстовый документ: обычный текст-страница, абзац, строка, слово, символ Таблица – строка, столбец, клетка Программный текст – строка , символ Внедренные объекты – рисунок, электронная таблица, диаграмма, другие объекты 2. Основные понятия и действия - строка заголовка, строка меню, стандартная панель, панель форматирования, маркеры отступа, линейка, ползунок, курсор, строка состояния, рабочая область, полоса прокрутки. 3. Создание документа – запуск программы, набор текста, форматирование, печать.
s:real;
i:integer;
begin
s:=10000;
while s<20000 do
begin
s:=s*1.05;
inc(i);
end;
writeln('Через ',i,' года');end.