Гражданин открывает счёт и кладёт 10000 рублей. Каждый месяц его размер вклада увеличивается на 2% от имеющийся суммы. Определите сколько будет на счете через 6 месяцев и 12 месяцев . Программа Паскаль

мы мусульманеоаоаокоаокругк

Добрый день!

Чтобы решить данную задачу, мы можем использовать цикл, чтобы рассчитать сумму на счете через заданное количество месяцев. В данном случае, у нас есть 2% от имеющейся суммы, которую мы будем добавлять к вкладу каждый месяц. Давайте напишем программу на языке Паскаль для решения этой задачи:

```pascal
program BankDeposit;

var
sum, deposit: real; // переменные для суммы на счете и размера вклада
months: integer; // переменная для количества месяцев
i: integer; // переменная для цикла

begin
sum := 10000; // начальная сумма на счете
deposit := sum; // размер вклада равен начальной сумме

months := 6; // количество месяцев

// рассчет суммы на счете через заданное количество месяцев
for i := 1 to months do
begin
deposit := deposit + (0.02 * deposit); // увеличение размера вклада на 2%
sum := sum + deposit; // добавление размера вклада к сумме на счете
end;

writeln('Сумма на счете через ', months, ' месяцев: ', sum:0:2); // вывод результата

months := 12; // изменение количества месяцев

// рассчет суммы на счете через заданное количество месяцев
for i := 1 to months do
begin
deposit := deposit + (0.02 * deposit); // увеличение размера вклада на 2%
sum := sum + deposit; // добавление размера вклада к сумме на счете
end;

writeln('Сумма на счете через ', months, ' месяцев: ', sum:0:2); // вывод результата

end.
```

В первой части программы мы инициализируем переменные для суммы на счете (`sum`), размера вклада (`deposit`), количества месяцев (`months`) и цикла (`i`).

Затем мы задаем начальную сумму на счете и присваиваем ее переменной `sum`. Размер вклада (`deposit`) также равен начальной сумме.

Далее мы задаем количество месяцев (`months`). В данном случае, мы сначала рассчитаем сумму на счете через 6 месяцев, а затем через 12 месяцев. Мы используем цикл `for`, чтобы пройтись через каждый месяц.

Внутри цикла мы увеличиваем размер вклада на 2% от имеющейся суммы, используя формулу `deposit := deposit + (0.02 * deposit)`. Затем мы добавляем размер вклада к сумме на счете, используя формулу `sum := sum + deposit`.

После выполнения цикла мы выводим результат, используя `writeln('Сумма на счете через ', months, ' месяцев: ', sum:0:2);`. Здесь мы используем переменную `months` для вывода количества месяцев и переменную `sum` для вывода суммы на счете.

Результаты будут выведены на экран в формате `Сумма на счете через X месяцев: Y`, где `X` - количество месяцев, а `Y` - сумма на счете.

Надеюсь, данное объяснение и программа помогут вам понять, как решить данную задачу. Если у вас возникнут еще вопросы, пожалуйста, не стесняйтесь задавать их!