Это вовсе не учеба, нужна
Не очищается история браузера(safari)

278

310

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

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

sashaShelsy

Информатика

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

блин, понимаю тебя паххахахаха, на ютубе нет? у меня андроид просто

aze1234

Информатика

4,4(83 оценок)

мда жаль тебя думаю чем не могу придумать

Anastasia9311

Информатика

4,5(24 оценок)

Vara, b, c, x, x1, x2, d, max: real; beginwrite('введите a: '); readln(a); write('введите b: '); readln(b); write('введите c: '); readln(c); d : = b * b + 4 *a * c; if d > 0 then begin x1 : = (-b + sqrt(d))/(2 * a); x2 : = (-b - sqrt(d))/(2 * a); if x1 > x2 then max : = x1 else max : = x2; end else if d = 0 then max : = -b /(2 * a); if ( d < 0) then writeln('корней нет')else writeln(max * max); end.