Паскаль. вычислить значение функции заданной в виде графика. разветвляющийся алгоритм
203
491
Ответы на вопрос:
// pascalabc.net
var
x, y: real;
begin
writeln('введите значение x');
readln(x);
if (abs(x) > 2) then
y : = 1
else if ((abs(x) < = 2) and (abs(x) > 1)) then
y : = abs(x)
else
y : = sqrt(1 - x*x);
writeln('f(x) = ', y);
end.
Var x,y: integer; begin writeln('x='); readln(x); writeln('y='); readln(y); if x< y then writeln (x+y,' ',y) else writeln(x,' ',x+y); readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
tokio27213.05.2022 10:37
-
logan907.11.2022 04:13
-
Какашки45604.03.2023 14:28
-
vualada13.08.2021 15:38
-
Lilic1503ld08.01.2023 21:44
-
vasilzuk24.01.2023 18:06
-
see99aa13.09.2020 01:49
-
Buivid115.11.2020 07:00
-
penguin821.11.2022 01:39
-
Слендер1205.03.2022 01:20
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.