Тренировочный цикл Васи состоит из N дней.В первый день он пробегает 1 км,а в каждый последующий-на 1 км больше,чем в предыдущий.Сколько км пробежал Вася за тренировочный цикл? ПРИМЕР Ввод:10 Вывод:55 Использовать цикл while.
а нельзя сделать с циклом for? так же проще будет.
А можешь показать с циклом for?
секунду
Program solid;var s:real;n,i:integer;beginread(n);writeln('кол-во дней=',n);for i:=1 to n dobegins:=s+1;end;writeln('Вася пробежит ',s,' км за тренировочный цикл');end.
большое спс!
рада помочь)
В общем, на программу с while: Program solid; var n,i,s:real; begin read(n); writeln('кол-во дней=',n); i:=1; s:=0; while i<=n do<br>begin i:=i+1; s:=s+1; end; writeln('Вася пробежит ',s,' км за тренировочный цикл'); end.