Для фиксированной ставки.
//Pascal
var
A, T, p: real;
n, i: integer;
begin
write('Введите сумму вклада(A) = '); readln(A);
write('Введите процент годовых(T) = '); readln(T);
write('Введите срок(лет)(n) = '); readln(n);
p := A * T / 100;
for i := 1 to n do A := A + p;
writeln('Итоговая сумма с учетом % по вкладам = ', A);
end.
1. с
3.а
4.так то иерхарический, но тут скорее вербальный подойдёт
6b
7b
9.процесс замены реального объекта (процесса, явления) моделью, отражающей его существенные признаки с точки зрения достижения конкретной цели; скорее b
12.b
<span>13. с (совокупность записанных на языке математики формул, отражающих те или иные свойства объекта-оригинала или его поведение)</span>
Важная информация - история моего народа , культура общения, охрана природы
Полезная информация -как правильно питаться , разные конкурсы , дистанционное обучение
Безразличная информация - как выиграть в разных играх
Вредная информация-Реклама игр для детей старше 18 лет , реклама неприличных книг, разные посты в соц сетях которые являются пропагандой чего то плохого
Uses crt;
var n,sum,i:integer;
begin
read(n);
while n>0 do
begin
if ((n mod 10) mod 2=0) and (n mod 10<8) then
sum:=sum+(n mod 10);
n:=n div 10;
end;
writeln(sum);
<span>end.</span>