Предмет: Информатика,
автор: platonkursakov
Спортсмен пробегал 10 км в день. начав тренировки, он увеличивал норму на 10% от нормы предыдущего дня. какой суммарный путь пробежит спортсмен за 7 дней? С ПАСКАЛЕВСКИМ КОДОМ!!!
iolandavalerypad353:
Сколько спортсмен пробежал в первый день?
function F(L: real; n: integer): real;
begin
if n = 1 then Result := L
else
Result := L + F(L * 1.1, n - 1)
end;
begin
var L := 10;
var n := 7;
Write(F(L, n))
end.
begin
if n = 1 then Result := L
else
Result := L + F(L * 1.1, n - 1)
end;
begin
var L := 10;
var n := 7;
Write(F(L, n))
end.
begin
var L := 10.0;
var n := 7;
var Sum := 0.0;
for var i := 1 to n do
begin
Sum += L;
L := L * 1.1;
end;
Write(Sum)
end.
var L := 10.0;
var n := 7;
var Sum := 0.0;
for var i := 1 to n do
begin
Sum += L;
L := L * 1.1;
end;
Write(Sum)
end.
Ответы
Автор ответа:
0
program raf105;
var x,y,day:real;
begin
x:=10;
while day<7 do
begin
x:= x+x/100*10;
y:= y+x;
day:= day+1;
end;
writeln('Суммарный путь, который пробежит спортсмен за 7 дней тренировок: ',round(x),' км.');
end.
Программа написана на языке PascalABC
Похожие вопросы
Предмет: Русский язык,
автор: lopmarina4
Предмет: Математика,
автор: erymories
Предмет: Музыка,
автор: lrazanova719
Предмет: Математика,
автор: SlimeLimeGamer
Предмет: Литература,
автор: MaKcKoPe