Спортсмен готовясь к соревнованиям в первый день тренировок на первый день пробежал один круг на второй 2 на третий три и тд сколько кругов спортсмен пробежал за 8 дней решение в паскале

За первый день - 1 круг.

За второй день - 2 круга.

За третий день - 3 круга.

За четвертый день - 4 круга.

За пятый день - 5 кругов.

За шестой день - 6 кругов.

За седьмой день - 7 кругов.

За восьмой день - 8 кругов.
Если хочешь ответ вот:
8+7+6+5+4+3+2+1=36 кругов пробежал за 8 дней.

#include<iostream.h>

#include<conio.h>

#include<stdio.h>

 

int main()

 

 {

 

      int b;                                 // наше число b

      clrscr();                           // очищаем экран 

 

      cout<<"Введите b: ";  // Выводим на экран приглашение ввести и  

      cin>>b;                          // b присвиваем введённое значение  

 

         // если b=0 то выводим соответствующее сообщение 

 

        if (b==0)      cout<<"Ноль Совсем Ноль \n "; 

 

       // если b<0 и остаток от деления на 2 =0 то это  отрицательное четное число

        if  ((b<0) && (b%2)==0) cout<<"отрицательное четное число \n ";  

 

// если b<0 и остаток от дления на 2 <>0 то это  отрицательное нечетное число

 if  ((b<0) && (b%2)!=0) cout<<"отрицательное нечетное число \n ";

 

   

 // если b>0 и остаток от деления на 2 =0 то это  положительное   четное число  

        if  ((b>0) && (b%2)==0) cout<<"положительное четное число \n ";  

 

   // если b>0 и остаток от деления на 2 <>0 то это  положительное  нечетное число     

        if  ((b>0) && (b%2)!=0) cout<<" положительное  нечетное число \n ";   

 

  getch();   // ждём нажатия на любую клавишу перед  закрытием

  return 0; // стандартный выход  

 

} 

 

 

 

Прежде всего - формулы. Пусть а - длина стороны, тогда


var
  a, r, rr, h, s: real;

begin
  Write('Введите длину стороны треугольника: ');Readln(a);
  r := sqrt(3) * a / 6;
  rr := 2 * r;
  h := 3 * r;
  s := a * h / 2;
  Writeln('Радиус вписанной окружности ', r);
  Writeln('Радиус описанной окружности ', rr);
  Writeln('Высота треугольника ', h);
  Writeln('Площадь треугольника ', s);
end.

Тестовое решение:
Введите длину стороны треугольника: 10
Радиус вписанной окружности 2.88675134594813
Радиус описанной окружности 5.77350269189626
Высота треугольника 8.66025403784439
Площадь треугольника 43.3012701892219