Клиент открыл счёт в банке 1 марта,вложив 1000 рублей.каждый месяц размер вклада увеличивается на 2 процента.определить за какой месяц величина ежемесячного увеличения вклада превысит 50 рублей.напишите,,программу.
Ответы на вопрос:
program vidcvnjiod;
uses crt;
var p,a: real;
m: integer;
begin
clrscr;
a: =1000;
p: =(a*2)/100;
m: =3;
repeat
a: =a+p;
m: =m+1;
until a> 1050;
m: =m mod 12;
case m of
0: writeln('декабрь');
1: writeln('январь');
2: writeln('февраль');
3: writeln('март');
4: writeln('апрель');
5: writeln('май');
6: writeln('июнь');
7: writeln('июль');
8: writeln('август');
9: writeln('сентябрь');
10: writeln('октябрь');
11: writeln('ноябрь');
readln;
end.
откомпиль, если ошибки, то исправь, но вроде не должно быть
в программе а=1000
отсчитывается процент
идет цикл пока сумма не больше 1050
прибавляется процент и месяц идет дальше
затем выбор месяца
1) 2²=4 цвета --> 2 бита для кодирования одного пикселя
2) 21*21*2= 882 бита - объём памяти растрового изображения
Популярно: Информатика
-
KriRo7714.01.2021 22:29
-
Вилетта200624.12.2020 20:48
-
diamiss4508.11.2020 20:40
-
demeshkin108.08.2021 19:29
-
miniloza200530.06.2020 09:19
-
бобр0426.03.2023 17:12
-
mikityuk0307.12.2020 02:48
-
Nasvay22809.05.2022 18:32
-
katmik0414.09.2020 17:54
-
nastyafominto30.06.2023 20:19