Алгебра: Построй график функции

elik20

11.03.2023 05:33

Алгебра

Есть ответ 👍

Построй график функции

286

483

Посмотреть ответы 1

Ответы на вопрос:

MarusiaG

Алгебра

4,4(9 оценок)

procedure max(a,b,c:integer; var q:integer);

begin

if a>b then if b>c then q:=b else q:=c;

if a<b then if a<c then q:=c else q:=a;

end;

...

var a1,b1,c1, a2,b2,c2, a3,b3,c3:integer;

begin

... Вводим

max(a1,b1,c1,a1);

max(a2,b2,c2,a2);

max(a3,b3,c3,a3);

max(a1,a2,a3,a1);

... Выводим а1

end.

Объяснение:

var a1,b1,c1,a2,b2,c2,a3,b3,c3:integer;

max1,max2,max3,min1,min2,min3:integer;

max,min,rar:integer;

procedure pr(a,b,c:integer;var z,w:integer);

begin

if (a>=b) and (a>=c)then z:=a;

if (a<b) and (a<c) then w:=a;

if (b>=a) and (b>=c)then z:=b;

if (b<a) and (b<c) then w:=b;

if (c>=a) and (c>=b)then z:=c;

if (c<a) and (c<b) then w:=c;

end;

begin

read(a1,b1,c1);

pr(a1,b1,c1,max1,min1);

read(a2,b2,c2);

pr(a2,b2,c2,max2,min2);

read(a3,b3,c3);

pr(a3,b3,c3,max3,min3);

pr(max1,max2,max3,max,rar);

pr(min1,min2,min3,rar,min);

write(max,' ',min);

end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Алгебра

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.