Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Задача в паскале(Pascal ABC)

Лыжник начал тренировки с пробегом в 10 км, каждый день он увеличивал длину пробега на 2 км. Сколько он пробжит км на 10-ый день?

Ответ оставил Гость

var
a,b,i:integer;
begin
i:=0;
a:=10;
b:=0;
for i:=1 to 10 do
begin
b:=b+a;
a:=a+2;
end;
writeln(на 10 день он пробежит ,a,км, а всего ,b,км);
end.