написать в ЭКСЕЛЕ формулы для нахождения a,b,c. Это уровень класса 9, но у меня не получается

#include <iostream>

#include <math.h>

const double g = 9.08665;

int main() {

unsigned int h;

std::cout << "Enter height of tree :" ;

std::cin>> h;

if (std::cin.fail()) // если предыдущее извлечение оказалось неудачным,

       {

           std::cin.clear();

           std::cin.ignore(32767,'\n');

std::cout << "Please die";

return 2;

       }

if(h == 0) {

std::cout<<"You are stupid! Apple is on the earth\n";

return 1;

}

std::cout<<"Program is thinking, but you no!\n";

double t = sqrt(2 * h / g);

std::cout << "Time is " << t << "\n";

std::cout << "Goodbye asshole\n";

return 0;

}

Объяснение:

Надеюсь, тебе не поставят два за это

Замени мои матные выражения в "" и можешь сдавать

Ошибки в программе:

Program primer - не хватает точки с запятой

Var a,b: integer;

Begin ; - не ошибка, необязательная точка с запятой

 ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками

 s=a+b; - не хватает двоеточия в :=

 m:=a*b;

 d:=a:b; - переменная d не была описана; деление - это /

 WriteLn(s);

 WriteLn(m);

 WriteLn(d)

End - не хватает точки.

Исправленная программа:

Program primer;

Var a, b: integer;

  d: real;

Begin

  ReadLn(a, b);

  s := a + b;

  m := a * b;

  d := a / b;

  WriteLn(s);

  WriteLn(m);

  WriteLn(d)

End.