Написать программу(pascal) которая вводит с клавиатуры числа а, b, c. найти на сколько увеличится за а лет b рублей положенная в банк если годовая прибыль составляет с процентов. (используя только mod div. 1 курс корочи) заранее
Даже понятия не имею, к чему тут div и mod. решается циклом for: var a,i: integer; b,c,b2: real; begin write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); c: =c*0.01; b2: =b; for i: =1 to a do b2: =b2+(b2*c); b2: =b2-b; writeln('ответ: ',b2: 0: 2); end.
Var n: integer; begin readln(n); if (n mod 10 =1) and (n< > 11) then writeln(n,' год') else if (n> =5) and (n< =20) then writeln(n,' лет') else if (n mod 10< =4) and (n mod 10> 0) then writeln(n,' года') else writeln(n,' лет'); end.