ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!!!!! ПАСКАЛЬ
в первый день путешественник прошел 20 км. в каждый следующий день он проходил на 2 км больше чем в предыдущий день. какой путь он пройдет за 5 дней?
Var a,b,s:integer;
begin
a:=20;
while b<5 do
begin
s:=s+a;
a:=a+2;
b:=b+1;
end;
writeln(Путник прошел ,s, километров);
end.
Оцени ответ
