Написать код программы на языке паскаль
(фото выше)
очень надо

117

482

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

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

книга67

Информатика

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

program Hello;

var x : integer;

begin

write ('Введите x: ');

readln(x);

if x > 3 then

writeln('ответ: ', -3 * x + 9)

else

writeln('ответ: ', (x*x*x)/((x*x) + 8));

end.

sir13

Информатика

4,5(95 оценок)

--- PascalABC.NET 3.6.2 ---

begin

var func1: real -> real := x -> -3*x + 9;

var func2: real -> real := x -> (x**3)/((x**2) + 8);

var X := ReadInteger();

Println(X > 3 ? func1(X) : func2(x));

end.

Пояснение: Тернарный оператор так же является условным, по этому его использование не противоречит условию задания.

Br0shn1k

Информатика

4,5(24 оценок)

2в восьмой степени = 256 8 * 64 = 512 бит 512 * 20= 10240 бит

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

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

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

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

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

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