var
a, b, c: <em>real</em>;
begin
readln(a, b, c);
if (sqr(b) - 4 * a * c < 0) then
writeln('Нет решений')
else
if (sqr(b) - 4 * a * c = 0) then
writeln('x = ', (-1 * b) / (2 * a))
else
begin
writeln('x1 = ', (-1 * b + sqrt(sqr(b) - 4 * a * c)) / (2 * a));
writeln('x2 = ', (-1 * b - sqrt(sqr(b) - 4 * a * c)) / (2 * a));
end;
end.
Средняя температура в вашем регионе за последний месяц, <span>среднее число осадков, выпадающих в вашем регионе в течение года</span>
См файл
за январь нет оплаты так как нет предыдущих показаний
Excel таблицы не прикрепляются
Ответ:
а)Сегодня хорошая погода!
б)Вы верно выполнили домашнее задание.
фраза "Старайтесь при выполнении заданий!" шифром Виженера
"ьюабноепэь аюн фёыоьыйауф зрсеаух!"
Объяснение: