Напишите программу ДАНО ЧИСЛО А, ЕСЛИ ЗАДАННОЕ ЧИСЛО А МЕНЬШЕ 5 ТО ЧИСЛО А НАДО
УМЕНЬШИТЬ НА 2
пайтон

Question

Информатика: Напишите программу ДАНО ЧИСЛО А, ЕСЛИ ЗАДАННОЕ ЧИСЛО А МЕНЬШЕ 5 ТО ЧИСЛО А НАДО УМЕНЬШИТЬ НА 2 пайтон

Goodok10 · Accepted Answer

Var   a, b, c, d: real; begin   write( Введите коэффициенты a,b,c );   readln(a, b, c);   d := sqr(b) - 4 * a * c;   if d = 0 then     writeln( Корень один x = , (-b / (2 * a))     else if d 0 then       writeln( x1 = ,(-b + sqrt(d)) / (2 * a), x2 = ,(-b - sqrt(d)) / (2 * a))     else writeln( Действительных корней нет ); end. Тест №1 Введите коэффициенты a,b,c 1 -5 6 x1 = 3 x2 = 2 Тест №2 Введите коэффициенты a,b,c 1 2 3 Действительных корней нет Тест №3 Введите коэффициенты a,b,c 1 0 0 Корень...

Напишите программу ДАНО ЧИСЛО А, ЕСЛИ ЗАДАННОЕ ЧИСЛО А МЕНЬШЕ 5 ТО ЧИСЛО А НАДО УМЕНЬШИТЬ НА 2 пайтон

MOGZ ответил

Напишите программу ДАНО ЧИСЛО А, ЕСЛИ ЗАДАННОЕ ЧИСЛО А МЕНЬШЕ 5 ТО ЧИСЛО А НАДО
УМЕНЬШИТЬ НА 2
пайтон