М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Составить программу для решения квадратного уравнения a*x*x+b*x+c=0

👇
Ответ:
123451499
123451499
07.12.2022
Var
  a, b, c, D: integer;
  x, x2: real;

begin
  write('Введите a: ');
  readln(a);
  write('Введите b: ');
  readln(b);
  write('Введите c: ');
  readln(c);
  D := sqr(b) - 4 * a * c;
  if D > 0 then begin
    x := (-b - sqrt(D)) / 2 * a;
    x2 := (-b + sqrt(D)) / 2 * a;
    writeln('x1 = ', x, newline, 'x2 = ', x2);
  end;
  if D < 0 then writeln('Корней нет.');
  if D = 0 then begin
    x := (-b) / 2 * a;
    writeln('x = ', x);
  end;
end.
4,7(73 оценок)
Открыть все ответы
Ответ:
Tukko
Tukko
07.12.2022
Uses crt;
var dd,mm,gg:integer;
begin
readln(dd,mm,gg);
case dd of
1..5: writeln('начало');
6..14: writeln('первая половина');
15: writeln('середина');
16..25: writeln('вторая половина');
26..31: writeln('конец');
end;
case mm of
1: writeln('января');
2: writeln('февраля');
3: writeln('марта');
4: writeln('апреля');
5: writeln('мая');
6: writeln('июня');
7: writeln('июля');
8: writeln('августа');
9: writeln('сентября');
10: writeln('октября');
11: writeln('ноября');
12: writeln('декабря');
end;
if gg mod 4=0 then writeln ('високосный') else writeln('не високосный');
end.

---

var a:integer;
begin
readln(a);
writeln(a mod 10,a);
end.
4,4(43 оценок)
Ответ:
Pro228Pro
Pro228Pro
07.12.2022
Носитель информации (информационный носитель) — любой материальный объект или среда, используемый для хранения или передачи информации.Все носители информации применяются для: записи, хранения, чтения, передачи информации. Самым распространенным носителем информации до недавнего времени была бумага. Но время идет, и качество бумажных носителей перестало устраивать современное общество, озабоченное все возрастающим и возрастающим количеством информации, которое нужно было сохранить и передать потомкам.  Информация записывается на носители информации посредством изменения физических, химических или механических свойств запоминающей среды. Таким образом мы с вами подошли к понятию запоминающего устройства.
4,7(17 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ