Ответы на вопрос:
Var a,b,c,d: integer; begin writeln('введите коэффициенты a, b, c: '); readln(a,b,c); d: =b*b-4*a*c; writeln('d = ',d); end. пример: введите коэффициенты a, b, c: 5 2 8 d = -156
Популярно: Информатика
-
Діанагрeк13.01.2023 22:29
-
kychymm22.06.2023 21:24
-
перйзат10.11.2020 08:51
-
milamul7412.07.2022 03:14
-
raimalqueen25.06.2022 01:34
-
ханито19.06.2021 01:08
-
akhdogru15.03.2023 07:14
-
alekszhirnovp06n4r06.02.2021 15:52
-
xawodilal27.06.2023 07:38
-
mcghcnnbn06.08.2022 05:57