Ответы на вопрос:
Program kvadrurav; var a: integer; b: integer; c: integer; d: integer; begin writeln('введите число а'); readln(a); writeln('введите число b') ; readln(b); writeln('введите число c'); readln(c); d: =b*b-(4*a*c); if d> 0 then writeln('x1='-sqrt(d))/(2*a),' ','x2='+sqrt(d))/(2* ; if d=0 then writeln('x1=',-b/(2*a)) else writeln('нет корней');
Популярно: Информатика
-
nabiullinnazim20.06.2020 02:42
-
ученик142525.03.2021 07:10
-
pashafil517.12.2022 17:54
-
Mary09060501.06.2022 08:56
-
dshaa1415.02.2020 14:07
-
ktukhfatulin102.03.2020 11:42
-
вася78427.09.2022 21:13
-
kosta29200630.04.2020 02:20
-
asadbekakramov08.03.2021 22:49
-
денис109531.10.2020 13:51