Спортсмен в первый день пробежал 5 км а последующие 9 дней на 5% больше то предыдущего дня. Выведете на экран километраж за каждый день и найдите, сколько спортсмен пробежал за 10 дней.
195
ОТВЕТЫ
Program pr1;
Uses Crt;
Var
n,i:integer;
a,b,s:real;
begin
ClrScr;
s:=5;
a:=5;
for i:=2 to 10 do
begin
a:=a*1.05;
s:=s+a;
end;
writeln(Спортсмен пробежал за 10 дней:,s);
readln;
end.
Uses Crt;
Var
n,i:integer;
a,b,s:real;
begin
ClrScr;
s:=5;
a:=5;
for i:=2 to 10 do
begin
a:=a*1.05;
s:=s+a;
end;
writeln(Спортсмен пробежал за 10 дней:,s);
readln;
end.
289
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Androdred
Паскаль.Составте программу, позволяющую найти количество цифр во введённой строке ...
2019-01-22 12:12:08
Христиан
Паскаль.Составте программу, позволяющую ввести фимилию, имя и отчество учащегося, ...
2019-01-22 12:12:02
Savuzhyun
1. Составьте программу, которая запрашивает с клавиатуры значения x ...
2019-01-22 12:11:54
Marinis
НА ПАСКАЛЕ!!! 1. Написать программу которая будет выводить сумму ...
2019-01-22 12:11:44