Предмет: Информатика,
автор: kojnakkp5sp6k
Напишите пожалуйста вторую программу в паскале(справа). Даю 100 баллов. Пожалуйста!!!!!!!!!!
Приложения:
Ответы
Автор ответа:
2
Ответ:Pascal
1 program lab;
2 var
3 s:real;
4 i,n:integer;
5 begin
6 writeln('введите кол-во лет и сумму');
7 readln(n,s);
8 for i:=1 to n do
9 s:=s+s*0.03;
10 writeln(s);
11 end.
Объяснение: примерно так.
kojnakkp5sp6k:
Спасибо огромное!
var (S,N):=ReadReal2('Введите сумму вклада и количество лет');
Write('Сумма станет ',S*1.03**n);
end.
Похожие вопросы
Предмет: Русский язык,
автор: vazir
Предмет: Другие предметы,
автор: 9anton9
Предмет: Русский язык,
автор: Lenuschka
Предмет: Математика,
автор: яяя481
Предмет: Математика,
автор: таня1532