Скажите пожалуйста, какой вам нужен паскаль. Сразу же - я пишу на delphi
#include
int main()
{
int a = 1;
for (int i = 1; i <= 100; i++)
{
if (i%2 == 0) a*=i;
}
cin.get();
return 0;
}
P. S. Dev C++ это не язык, это среда разработки, язык тут просто C++.
1) найти убыль как к-во * 12%
2) найти прирост как к-во * 20%
3) к-во = к-во-убыль+прирост
выполнить 8 раз
var
x,a,b:real;
i:integer;
begin
x:=100000;
for i:=1 to 8 do
begin
a:=x*0.12;
b:=x*0.20;
x:=x+b-a;
end;
writeln(x);
end.
<span>Программа, запускаемая при включении персонального компьютера, осуществляющая диалог с пользователем, организующая управление ресурсами компьютера и реализующая выполнение других программ, называется о<span>перационной системой.</span></span>