Var s,i,a:integer;
begin
s:=1; i:=5;
while s>=20 do
begin
a:=i;
s:=s+a;
i:=i+5;
end;
writeln('I = ',i);
end.
Результат:
I = 5
Вот на C++
#include
using namespace std;
int main() {
int s=1;
int i=5;
int a;
while (s>=20)
{
a=i;
s=s+a;
i=i+5;
}
cout << i;<br>}
Но результат всё равно = 5 :)