Turbo pascal cпортсмен в первый день пробежал x км. каждый следующий день он пробегал на h км. больше, чем в предыдущий. за сколько дней он пробежит n км.?

06060601 06060601    1   19.06.2019 04:10    0

Ответы
марина1930 марина1930  02.10.2020 05:06
Var
i:integer;
x,h,n:real;
begin
writeln('Введите x,h и n');
readln(x,h,n);
while x<n do 
begin
x:=x+h;
i:=i+1;
end;
writeln('за ',i,' дней');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика