ПОМОГИТЕ СОСТАВИТЬ ВЫЧИСЛЕНИЕ В PASCAL: РАЗВЕТВЛЯЮЩИЙСЯ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСССоставить...

+931 голосов
6.1m просмотров

ПОМОГИТЕ СОСТАВИТЬ ВЫЧИСЛЕНИЕ В PASCAL: РАЗВЕТВЛЯЮЩИЙСЯ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСССоставить программу вычисления функции на языке PASCAL:


Информатика | 6.1m просмотров
Дан 1 ответ
+195 голосов

// PascalABC.NET 3.6.3

begin

 var x := ReadReal;

 var y := if x >= -1 then Sqrt(x + 4)

   else if x < -4 then 2 * x + 5

   else 3 * x;

 Print(y)  

end.

(1.6k баллов)
+105

я вас не поняла

+58

Добрый вечер не поможите с вопрос он уже задан вот ссылка https://znanija.com/task/37777203 благодарю за помощь