Вопрос - ответ

Написал на Pascal ABC, но думаю пойдёт и на турбо т.к. они практически идентичны

Program ololo;
Var x1,x2,a,c,b,d:real;
Begin
Writeln ('Введите число "a"');
Readln (a);
Writeln ('Введите число "b"');
Readln (b);
Writeln ('Введите число "c"');
Readln (c);
d:=sqr(b)-(4*a*c);
Writeln ('Дискрименант ' , d);
x1:=-b+SQRT(d)/2*a;
Writeln ('Первый корень равен ' ,x1);
x2:=-b-sqrt(d)/2*a;
Writeln ('Второй корень равен ' ,x2);
End.


А лучше учи паскаль))))

Спасибо

Поздравляю!!! Крохе здоровья желаю =)

Если можно то...

Ещё не играл, нужно попробывать

Поздравляю

Синий взамен на жёлтый) Спс))

Добавлено спустя 06 секунд

Это график изменения стоимости кредитов на бирже за 24 часа, просто в другое время, и переживающий не лучшие времена по ходу дела)))

Недавно заметил, чем добрее мы к людям, тем больше они нами пользуются((((
"Не делай добра не будет зла"
Вот так печально всё выглядить...

Мы конечно люди самостоятельные но халяву тоже любим)))

+ 0.01c.

Вывод на мобильный и вконтакт))