Даю 25б.Напишіть програму для розвʼязання квадратного рівняння ax2+bx+c=0, де a≠0

Спочатку знаходимо D=b2-4ac. Якщо D<0, коренів немає.

171

440

Посмотреть ответы 1

Ответы на вопрос:

Книжнаябабочка

Информатика

4,6(84 оценок)

Var v1,v2,a1,a2,s,t: real; begin writeln ('введите начальные скорости автомобилей'); read (v1,v2); writeln ('введите ускорения автомобилей'); read (a1,a2); writeln ('введите начальное расстояние между автомобилями'); read (s); t: = + v2))+sqrt(sqr(v1+ v2)+(a1+a2)*2*s)/(a1+a2)); writeln (t); end.