Войти Регистрация Спроси ai-bota

если x< =7; 1/x-7, если x> 7

Ответ:

LeviAccem

10.07.2020 14:00

Program z1;
uses crt;
var y, x: real;
begin
readln(x);
if x <= 7 then y:=-3*x+9 else y:=1/x-7;
write(y);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Dipper17

27.01.2020 22:10

Дан массив целых чисел из 10 элементов, удалить из него все элементы, в которых последняя цифра четная,а само число делится на нее...

hanum27082005

08.04.2020 17:54

Вводится последовательность чисел до тех, пока не будет введено два равных числа подряд. посчитать количество чисел в последовательности. выходные данные выведите количество...

Lalker1337

08.04.2020 17:54

Даны натуральные числа a и b. требуется найти такое минимально возможное натуральное число k ≥ a, что сумма всех чисел от a до k больше b. для решения этой ученик написал...

Noyaneya

09.04.2021 17:33

Написать программу со алгоритмом первую - на паскале...

миру3

30.06.2021 08:40

Дан одномерный массив. найти сумму элементов и их количество,которые больше 8 и меньше13. хелп и ,если можно, капельку объяснений)...

lolipop310

08.01.2022 02:39

Как заполнить двухмерный массив c++ нужно заполнить массив в первой ячейка хранится делится ли введенное число на три,а во второй остаток от индекса введенного числа...

vecronika54

07.11.2021 12:30

Влинейном массиве из 25 элементов (заполняется случайными числами из интервала от +13 до +35) определить количество элементов массива, кратных 3 и одновременно больше...

Tbdtbd

21.10.2021 17:10

Вводится женское имя, заканчивающееся на а или я . составьте программу, которая выводит имя в уменьшительно-ласкательной форме. если имя заканчивается на а , то к основе...

samayazeynalova02

06.09.2022 18:16

Решите по информатике было бы хорошо если бы написали и отправили фото)...

ipadsanya

07.09.2022 01:40

Дан целочисленный массив в[1..5, 1..5]. напечатать его главную и побочную диагонали. паскаль...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку