Ответы на вопрос:
Program kv; var a,b,c,x1,x2,x,d: real; begin write ('input a b c => '); readln (a,b,c); if a = 0 then if b = 0 then begin writeln ('the equation is not compatible'); readln; halt end else begin x : =-c / b; writeln ('root x=' ,x: 8: 2); readln; halt end else begin d : =sqr (b) - 4 * a * c; if d< 0 then begin writeln ('the equation has no real roots'); readln; halt end else begin x: =-b /( 2 * a ); if d = 0 then begin writeln ('roots are equal x1=x2=', x: 8: 2); readln; halt end; x2: = sqrt (d)/(2*a); x1: = x2 + x; x2: = x - x2; writeln('roots: x1=',x1: 8: 2, ' x2= ',x2: 8: 2) endend; readln; end.
pascalabc.net
begin
var (a, b, k) : = readinteger3('введи a, b, k: ');
loop k do
println(int64(a) * b)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
дошикестдошик09.01.2020 16:25
-
английскийязык1431.08.2022 22:50
-
emesiemesi9514.04.2023 06:35
-
Ульяна273202.06.2020 01:10
-
anastasiyaryum129.03.2020 06:24
-
nesuk0717.01.2021 03:04
-
1анж4803.07.2022 15:31
-
474738467383805.03.2021 13:00
-
Egor22222222212.04.2023 04:22
-
Нурсая1234507.10.2022 18:13
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.