Написать программу решения квадратного уравнения. программа должна проверять правильность исходных данных и в случае, когда коэффициент при 2 степени неизвестного = 0, выводить соответствующее сообщение. ниже представлен рекомендуемый вид экрана во время
работы программы (данные, введение пользователем, выделены полужирным шрифтом). * решение квадратного уравнениявведите в одной строке значение коэффициентов нажмите < enter> => 12 27 -10корни уравнения: х1= - 25.551х2= - 28.449
233
299
Ответы на вопрос:
Var a: array[1..30] of integer; i,k,min: integer; begin writeln('введите годы рождения '); for i: =1 to 30 do begin readln(a[i]); end; min: =a[1]; for i: =1 to 30 do begin if a[i]< min then begin min: =a[i]; k: =i; end; end; writeln('порядковый номер самого старшего по возрасту человека равняется ',k); end.
Популярно: Информатика
-
gamzat37058722.01.2023 09:05
-
sabserj29.11.2021 18:28
-
superbest13.05.2022 21:35
-
Froxy13.03.2020 20:28
-
Molderjkee05.09.2020 15:40
-
Vladimirmir2823.11.2021 03:45
-
khana315.07.2022 01:25
-
flox199823.01.2021 17:09
-
Gymanitariu15.09.2020 05:58
-
tvojrulet1606.04.2022 04:32