Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

1)

Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры.
апп

Решение задачи: «Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика.»

textual
Листинг программы
uses crt;
var r:real;
    x:integer;
begin
clrscr;
for x:=-4 to 10 do
 begin
  write('x=',x:3,' ');
  if (x>=-4) and (x<-2) then writeln('y=',x+3:2) else
  if (x>=-2) and (x<4) then writeln('y=',-(x/2):5:2) else
  if (x>=4) and (x<6) then writeln('y=',-2:2) else
  if (x>=6) and (x<=10) then writeln('y=',sqrt(4-sqr(x-8))-2:5:2);
 end;
readkey;
end.

Объяснение кода листинга программы

  1. В начале кода подключается библиотека crt, которая является стандартной для языка Turbo Pascal.
  2. Затем объявляются две переменные: r типа real и x типа integer.
  3. Строка clrscr очищает экран перед началом вывода.
  4. Далее идет цикл for, который выполняется 21 раз (от -4 до 10 включительно).
  5. Внутри цикла выводится значение переменной x с помощью функции write.
  6. Затем проверяется условие для вычисления значения переменной y. Если x больше или равно -4 и меньше -2, то выводится значение x + 3. Если x больше или равно -2 и меньше 4, то выводится значение x / 2. Если x больше или равно 4 и меньше 6, то выводится -2. Если x больше или равно 6 и меньше 10, то выводится sqrt(4 - sqr(x - 8)) — 2.
  7. После выполнения цикла читается нажатая клавиша с помощью функции readkey.
  8. Конец программы.

Оцени полезность:

7   голосов , оценка 4 из 5
Похожие ответы