Предмет: Информатика, автор: htdfhhd

СРОЧНО   Составить блок схему и программу для вычисления значения функции y в зависимости от х

Приложения:

Ответы

Автор ответа: Аноним
0
var
  x, y: real;

begin
  Write('Введите значение аргумента: ');
  Readln(x);
  if x <= 1 then y := -1 / sqr(x)
  else if x <= 0 then y := -x
  else y := -sqr(x);
  Writeln('Значение функции равно ', y)
end.

Тестовое решение:

Введите значение аргумента: -2.7
Значение функции равно -0.137174211248285


Приложения:
Автор ответа: bataxe45
0
Вот так вот получилось. Записать можно каждый прямоугольник под ромбом 
Приложения:
Автор ответа: bataxe45
0
Вот немного код выше можно подредактировать "Writeln('Значение функции равно ', y:4:2)"
Похожие вопросы
Предмет: Қазақ тiлi, автор: matmila4566