Написать на pascal abc: начав тренировки, пловец в первый день проплыл 20 метров . каждый следующий день проплывает на 2 метра больше чем в предыдущий . найти суммарную сумму расстояния за неделю

adri121 adri121    2   25.08.2019 01:50    0

Ответы
tanya18veselova tanya18veselova  05.10.2020 17:49
Var d,s:real; i:integer;
begin
d:=20; s:=d;
for i:=2 to 7 do
 begin
 d:=d+2;
 s:=s+d;
 end;
writeln('s = ',s);
end.

Результат:
s = 182
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика