Напишите программу которая вычесляет(а)дискриминант квадратного уравнения (б)площадь кольца,если его толщина t см,а диаметрвнутреннего круга d см

Напишите программу которая вычесляет(а)дискриминант квадратного уравнения (б)площадь кольца,если его толщина t см,а диаметрвнутреннего круга d см
Гость
Ответ(ы) на вопрос:
Гость
Вот первая: Program test; Var d,a,b,c:integer; Begin Writeln("Введите коэффициенты каждого члена квадратного уравнения:"); readln(a,b,c); d=b*b-4*a*c; writeln(d); End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы