Для n введенных чисел посчитайте количество и сумму положительных чисел, количество и произведение отрицательных чисел программа paskal
172
350
Ответы на вопрос:
1)d=(-37)^2-4*1*27=1369-108=1261 x1=)+35,5)/2*1=72,5/2 x1=36,25 x2=)-35,5)/2=1,5/2 x2=0,75 x1+x2=36,25+0,75=37 x2=36,25*0,75=27,19 2) x(x-210)=0 x1=0 x2=210 x1+x2=0+210=210 x1*x2=0*210=0 3)y(1-y)=0 y1=0 y2=1 y1+y2=0+1=1 y1*y2=0*1=0 4)d=41^2-4*1*(-371)=1681+1484=3165 x1=(-41+56,26)/2=15,26/2 x1=7,63 x2=(-41-56,26)/2=-97,26/2 x2=-48,63 x1+x2=7,63+(-48,63)=-41 x1*x2=7,63*(-48,63)=-371,05 5)y1=√19 y2=-√19 y1+y2=√19-√19=0 y1*y2=√19*(-√19)=-√(19)^2=-19 6)x1=√(10/3) x2=-√(10/3) x1+x2=√(10/3)+(-√(10/3))=0 x1*x2=√(10/3)*(-√(10/3))=-10/3
program raf105;
var
n,i,x,sum,pro,kol1,kol2: integer;
begin
write('введите n: ');
readln(n);
writeln('вводите ',n,' чисел по очереди');
pro: = 1;
for i: =1 to n do
begin
readln(x);
if x > 0
then begin
sum: = sum+x;
kol1: = kol1+1;
end;
if x < 0
then begin
pro: = pro*x;
kol2: = kol2+1;
end;
end;
writeln('количество положительных: ',kol1);
writeln('сумма положительных: ',sum);
writeln('количество отрицательных: ',kol2);
writeln('произведение отрицательных: ',pro);
end.
pascalabc 3.4.2Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
alina0612220.02.2023 23:19
-
burlakovartemyoxcyjx09.11.2022 13:39
-
beliaeva20131.05.2023 09:10
-
Лиза22110003.08.2020 12:50
-
36kot36128.05.2020 23:36
-
oDESo16.02.2022 07:17
-
wwwem825.04.2020 22:16
-
artem19090910.08.2020 00:45
-
Rapapapapap221219.05.2022 18:36
-
mi198001.01.2023 13:07
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.