Ответы на вопрос:
Как-то так крч=) program z1; var a,b,c,d,x1,x2: real; begin a: =4.00; b: =-52.00; c: =144.00; d: =b*b - 4*a*c; x1: =(-b+ sqrt(d))/(2*a); x2: =(-b- sqrt(d))/(2*a); if x1> x2 then begin writeln('меньший корень',x2,'больший корень',x1) end else writeln('меньший корень ',x1,'больший корень ',x2); end.
Популярно: Информатика
-
Taylis6928.01.2020 17:37
-
katerinam200118.10.2021 21:52
-
pro6201.05.2022 04:39
-
betextinaanast105.08.2021 18:49
-
котик210701.01.2020 14:41
-
asadhfdgj19.09.2022 11:58
-
barslkbarslk12.08.2021 05:13
-
kristoyozhik13.01.2022 20:31
-
seryakovart18.01.2021 05:01
-
777Leha77713.08.2022 13:46