Проектирование алгоритмов и программ с использованием цикла с предусловием - Turbo Pascal

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

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

Значения функций и определены в точках . Найти среднее значение расстояния между и в заданных точках.

Решение задачи: «Проектирование алгоритмов и программ с использованием цикла с предусловием»

textual
Листинг программы
uses crt;
function f1(x:real):real;
begin
f1:=2.5+sin(4*x)
end;
function f2(x:real):real;
begin
f2:=2*cos(x/3)
end;
var xn,xk,dx,x,s:real;
    k:integer;
begin
clrscr;
repeat
writeln('Введите диапазон по х xn<xk');
readln(xn,xk);
until xk>xn;
repeat
write('Введите шаг dx<',xk-xn:0:2,' dx=');
readln(dx);
until dx<xk-xn;
x:=xn;
s:=0;
k:=0;
while x<=xk do
 begin
  s:=s+abs(f1(x)-f2(x));
  k:=k+1;
  x:=x+dx;
 end;
s:=s/k;
write('s=',s:0:2);
readln
end.

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

  1. Объявлены функции f1 и f2, которые принимают аргумент типа real и возвращают значение типа real.
  2. В функции f1 используется функция sin, которая вычисляет синус аргумента, и константа 2.5.
  3. В функции f2 используется функция cos, которая вычисляет косинус аргумента, и константа 2.
  4. В основной программе объявлены переменные xn, xk, dx, x, s и k типа real.
  5. Переменные xn и xk используются для ввода диапазона значений x.
  6. Переменная dx используется для ввода шага изменения x.
  7. Переменная x используется для итерационного вычисления значений функции в заданном диапазоне.
  8. Переменная s используется для накопления разности значений функций f1 и f2.
  9. Переменная k используется для подсчета количества итераций.
  10. В цикле while происходит итерационное вычисление значений функции в заданном диапазоне.
  11. Значение переменной s обновляется на каждой итерации.
  12. Значение переменной k обновляется на каждой итерации.
  13. Значение переменной x обновляется на каждой итерации.
  14. Значение переменной dx не изменяется в основной программе.
  15. Значение переменной xn не изменяется в основной программе.
  16. Значение переменной xk не изменяется в основной программе.
  17. После выполнения цикла, значение переменной s выводится на экран.
  18. Значение переменной k не выводится на экран.
  19. Значение переменной x не выводится на экран.
  20. Значение переменной dx не выводится на экран.

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

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