ОбъЗадача. Гражданка А.О. 1 марта 2018 открыла счёт в банке, вложив 1000 рублей. Через каждый месяц размер её вклада увеличивается на 2% от имеющейся суммы. Определить: Сумму вклада через один, два, …, двенадцать месяцев.
Построение математической модели решения:
Первоначальный вклад а0=1000
1 месяц: а1=а0+а0*0,02
2 месяц: а2=а1+а1*0,02
10 месяц: а10=а9+а9*0,02
Общий случай: an=an-1+an-1*0,02
Составим программу и протестируем ее. Программа составляется совместно с ребятами на доске.
Program vklad;
Var i: integer;
a: real;
Begin Writeln (‘введите значение первоначального вклада’);
Readln (а);
i:=1;
while i<=12 do
begin a:= a+a*0,02;
writeln (a);
i:=i+1; end;
end.
Задачу вводим в паскаль и тестируем.
- Хорошо, задачу решили, а теперь поиграем с ней.
- Назовите банки в Перми, которые вы знаете или там имеют вклады ваши родители? (сбербанк)
обяснение:
ну в жизни пригодится я думаю
Системы программирования -это система для разработки новых программ на конкретном языке программирования. Современные системы программирования обычно предоставляют пользователям мощные и удобные средства разработки программ.
Язык программи́рования — формальный язык, предназначенный для записи компьютерных программ. Язык программирования определяет набор лексических, синтаксических и семантических правил, определяющих внешний вид программы и действия, которые выполнит исполнитель (обычно — ЭВМ) под её управлением.
Объяснение:
извини если поздно
Поделитесь своими знаниями, ответьте на вопрос:
3. Дан целочисленный массив, заданный датчиком случайных чисел в интервале от 20 до 55. Найти минимальный элемент и его индекс. Решить в Pascal
PascalABC.NET 3.5.1 + .NET Framework 4.7.1
begin
var A := ArrRandom(10, 20, 55);
A.Println;
A.Min.Println;
A.IndexOf(A.Min).Println;
end.
Объяснение: