Регистрация
Yuntsev
12.04.2020 02:30
Информатика
Есть ответ 👍

Гражданин 1 января открыл счёт в банке, вложив 100 000 р.каждый месяц размер вклада увеличивается на 3% от имеющийся суммы. составьте программу для определения суммы вклада через 1, 2, 12 месяцев. результат выведите в два столбца: в первый столбец -номер месяца, во второй- соответствующую сумму вклада. abc pascal

211
274
Посмотреть ответы 2

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

RedSakura
RedSakura
4,4(96 оценок)
Program tref; var a,i: integer; begin a: =100000; for i: =1 to 12 do begin writeln(i,')',a); a: =(a*103)div 100; end; readln; end.
khadeevaelena
khadeevaelena
4,7(59 оценок)

var a,b,c,s: integer;

begin

readln(a,b,c);

s: =0;

if (a> 0) then s: =s+a;

if (b> 0) then s: =s+b;

if (c> 0) then s: =s+c;

writeln(s);

end.

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