Ответ ......................................35629
Диаграмма — графическое представление данных линейными отрезками или геометрическими фигурами, позволяющее быстро оценить соотношение нескольких величин. Представляет собой геометрическое символьное изображение информации с применением различных приёмов техники визуализации.
Для фиксированной ставки.
//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.
<em>// PascalABC.NET 3.3, сборка 1599 от 17.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString(' >');
Write('-> ');
var n:=s.Length;
if n<4 then Writeln(s)
else
while true do begin
var p:=n mod 3; p:=p=0?3:p;
Write(s[:p+1],',');
s:=s[p+1:];
n:=s.Length;
if n=3 then begin Writeln(s); Exit end
end
end.
<u>Примеры</u>
> 1231423454123112313211
-> 1,231,423,454,123,112,313,211
> 123456
-> 123,456
> 13
-> 13
var a: real;
begin
readln(a);
writeln((2 * a * a * a + 8)/(3 * a));
end.