Var d,p,x:real; t,i:integer;
begin
d:=120;
readln(p,x,t);
for i:=1 to t do d:=d+d*p/100-x;
writeln('d = ',d:5:2);
end.
Пример:
10 15 5
<span>d = 101.68</span>
#include <iostream>
#include <cmath>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
int
WidthPage,
HeightPage,
SumSizeFields,
SizeField,
WidthCharacter,
HeightCharacter,
CountCharacters;
float
CountPages,
SizePage,
AreaCharacter;
cout << "Введите ширину страницы: ";
cin >> WidthPage;
cout << "Введите высоту страницы: ";
cin >> HeightPage;
SizePage = WidthPage * HeightPage;
cout << "Ввод ширины полей производится по очереди через Enter. Если поле отстутствует, введите 0.\n";
int i = 0;
SumSizeFields = 0;
for (i = 0; i < 4; i++)
{
cout << "Введите ширину " << i+1 << " поля: ";
cin >> SizeField;
SumSizeFields = SumSizeFields + SizeField;
}
SizePage = SizePage - SumSizeFields;
cout << "======================\n";
cout << "Введите ширину символа: ";
cin >> WidthCharacter;
cout << "Введите высоту символа: ";
cin >> HeightCharacter;
cout << "Введите количество символов: ";
cin >> CountCharacters;
AreaCharacter = (WidthCharacter * HeightCharacter) * CountCharacters;
CountPages = AreaCharacter / SizePage;
cout << "Количество страниц в книге = " << ceil(CountPages) << endl;
system("pause");
return 0;
}