Автор Опять Ксс задал вопрос в разделе Другие языки и технологии
Паскаль / квадратно уравнение и получил лучший ответ
Ответ от M-Sk8[мастер]
Скобки поставь при вычислении корней (числитель) , остальное верно, проверил на паскаль абц: компилируется и выдает правильный ответ. Для красоты вывода поставь пробел перед х2 😉
Ответ от Дима мищенко[активный]
Program p23;vard,c,b,a:integer;x1,x2:real;beginwriteln('Введите первый коефицыент');readln(a);writeln('Введите второй коефицыент');readln(b);writeln('Введите третий коефицыент');readln(c);d:=(b*b)-(4*a*c);<b
Program p23;vard,c,b,a:integer;x1,x2:real;beginwriteln('Введите первый коефицыент');readln(a);writeln('Введите второй коефицыент');readln(b);writeln('Введите третий коефицыент');readln(c);d:=(b*b)-(4*a*c);<b
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Паскаль / квадратно уравнение
спросили в Sikorsky
Как будет выглядеть программа решения квадратного уравнения ax^2 + bx + c = 0 (Паскаль)???
Для Одри можно и покороче ))
Только для случая одного корня печатается 2 одинаковых. Так тоже
подробнее...
Как будет выглядеть программа решения квадратного уравнения ax^2 + bx + c = 0 (Паскаль)???
Для Одри можно и покороче ))
Только для случая одного корня печатается 2 одинаковых. Так тоже
подробнее...
Помогите написать программу для нахождения корней квадратного уравнения (паскаль), возможны различные варианты!
{Последний разочек помогу тебе... }
{Честное слово, проще программы я не писал никогда в
подробнее...
спросили в VRR
Задача в паскале!! Составить программу для вычеслени корней квадратного уравнения.Реализовать с помощью процедуры!!!
Это для вычисления для корней и для выявления действительно ли число иль нет. >>>
подробнее...
Задача в паскале!! Составить программу для вычеслени корней квадратного уравнения.Реализовать с помощью процедуры!!!
Это для вычисления для корней и для выявления действительно ли число иль нет. >>>
подробнее...
спросили в VRR
составить прогу для решения квадратного уравнения.в паскаль абц
var
a, b, c, D: Integer;
x1, x2: Real;
begin
WriteLn(\'Vvedite a, b, c\');
подробнее...
составить прогу для решения квадратного уравнения.в паскаль абц
var
a, b, c, D: Integer;
x1, x2: Real;
begin
WriteLn(\'Vvedite a, b, c\');
подробнее...
Помогите составить программу в Pascal ABC
program ok;
var
num:integer;
a,b,c:integer;
begin
readln(num);
a:=num
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
Вычислить корни квадратного уравнения по программе ТУРБО ПАСКАЛЬ
program kv;
var
a,b,c,D,x1,x2:real;
begin
Read(a,b,c);
подробнее...
Хорошую поликлинику (можно платную) в ЗАО посоветуйте пожалуйста
Поликлиника при минэкономразвития - "МЕДЭП" очень хорошая (платная)
Адрес:
г.
подробнее...