Используя два вида операторов цикла составить программы табулирования функции - Pascal ABC

  1. Используя два вида операторов цикла составить программы табулирования функции y=f(cos (1/x)) на отрезке [pi/4, 4/pi] с шагом h=(b-a)/m, где m – заданное число. Помогите пожалуйста.


textual

Код к задаче: «Используя два вида операторов цикла составить программы табулирования функции - Pascal ABC»

function f(x:real):real;
begin
f:=cos(1/x);
end;
var a,b,h,x,y:real;
    m:integer;
begin
a:=pi/4;
b:=4/pi;
write('Введите m=');
readln(m);
h:=(b-a)/m;
//в цикле while..do
x:=a;
while x<b+h/2 do
 begin
  writeln('x=',x:4:2,'  y=',f(x):6:4);
  x:=x+h;
 end;
writeln;
//в цикле repeat..until
x:=a;
repeat
writeln('x=',x:4:2,'  y=',f(x):6:4);
x:=x+h;
until x>b+h/2
end.

СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 4.000 из 5



Похожие ответы
  1. Составить программу обработки строковой информации с выводом на экран исходного и результирующего текстов. Исходный текст выбирается самостоятельно.Вычеркните из строки X те символы, которые используются в строке X дважды.

  1. Дан текст, в которой слова разделены пробелами, а в конце стоит точка. Если количество слов в тексте нечётное - вывести среднее слово; если чётное - вывести 2 средних слова.

  1. Задачка с виду не сложная, а загнала в тупик Дан одномерный целочисленный массив A(N). Известно, что среди его элементов два и только два равны между собой. Напечатать их индексы.

  1. Всем доброго времени суток! Программку набросал, вреде работает, но не до конца. почему-то находит два одинаковых max на одних и тех же местах, а надо чтобы даже если числа msx в массиве одинаковые, то выводился бы разный индекс этих чисел. Вот код программы:

  1. Заполнить массив случайными числами и отсортировать его. Ввести число Х. Используя двоичный поиск, определить, есть ли в массиве число, равное Х. Подсчитать количество сравнений. Пример: Массив: 147392452 После сортировки: 122344579 Введите число Х: 2 Число 2 найдено. Количество сравнений: 2

  1. Даны пять различных целых чисел. Найти среди них два числа, модуль разности которых имеет: Наибольшее значение

  1. Используя метод Монте-Карло, вычислить интеграл любой функции, при этом нужно задать количество проб и промежуток а и b.На Паскале. Заранее спасибо!

  1. заполнить массив случайными числами и отсортировать его ввести число x использовать двоичный поиск определить есть ли в массиве равное число х

  1. Найти два самых больших элемента в массиве Указать их значения и индексы Если можно с объяснением Заранее спасибо