команды,константы,числа,коды,пароли и всё такое прочее.то,что нужно компьютеру для оперативной работы в данный момент.её содержимое меняется в зависимости от текущей(-их) .идёт обмен с жёстким диском.
Дил1779
09.06.2021
Pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! begin var (a,b,c): =readreal3('введите через пробел a,b,c: '); var d: =b*b-4*a*c; if d< 0 then writeln('нет действительных корней') else if d=0 then writeln('единственный корень ',-b/2/a) else begin d: =sqrt(d); writeln('два корня: '-d)/2/a,' '+d)/2/a) end end. пример введите через пробел a,b,c: 2.6 -3.1 0.15 два корня: 0.0505284246495728 1.14177926765812
команды,константы,числа,коды,пароли и всё такое прочее.то,что нужно компьютеру для оперативной работы в данный момент.её содержимое меняется в зависимости от текущей(-их) .идёт обмен с жёстким диском.