Есть ответ 👍

Який компонент призначений для ведення і відображення короткого текстового рядка

198
362
Посмотреть ответы 2

Ответы на вопрос:


Відповідь:

Memo

Пояснення:


Var a,b,c,d,x1,x2: real; begin writeln('введите коэффициент a'); readln(a); writeln('введите коэффициент b'); readln(b); writeln('введите коэффициент c'); readln(c); d: =sqr(b)-4*a*c; if d> 0 then  begin x1: = )*b+sqrt(d))/(2*a); x2: =)*b-sqrt(d))/(2*a); writeln('x1=',x1,' x2=',x2); end else if d=0 then begin x1: = )*b)/(2*a); writeln('x=',x1); end else writeln('корней нет'); end.

Популярно: Информатика