Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Из множества целых чисел [1.100] выделить множество простых чисел; Из множества целых чисел выделить следующие множества: множество простых чисел; https://www.cyberforum.ru/ turbo-pascal/ thread825504.html Turbo Pascal Рекурсия+ файл
Вот процедура для записи в файл чисел отрицательных и положительных в любом порядке и которая выводит из этого файла сначала отрицательные затем положительные числа. Подскажите в чем ошибка? procedure Print; var f:text; x:integer; begin assign(f,'fail'); rewrite(f); readln(x);
Turbo Pascal не верю Уважаемые модераторы, не ругайте меня сильно, но не верю, что среди 42 с лишним тысяч тем нет ни одной решеной задачи про массивы, строки, записи ... В разделе FAQ есть замечательная тема "как запостить тему, чтобы не получить ответ". Почему бы всех, кто не пишет ни одной строчки сам, не отправлять туда. Глядишь, и спутники падать перестанут... так как - то https://www.cyberforum.ru/ turbo-pascal/ thread825436.html Turbo Pascal Решение одномерного массива https://www.cyberforum.ru/ turbo-pascal/ thread825429.html
Всем доброго времени суток. Есть одномерный массив, помогите решить. Заданы два одномерных массива . Вычислить Х по формуле .
Задать переменные для процедуры val Turbo Pascal
Подскажите, кто может..как правильно задать для процедуры val a,b,c?по идеи эти числа должны быть в string...но тогда для формул не правильный тип.. program kv; uses crt; var a,b,c,D:read; x, x1,x2:real; i:byte;otv: char; v,code:integer; begin clrscr; i:=1;
Turbo Pascal Вычислить значение выражения Помогите пожалуйста с решением данной задачи. Необходимо: Составить блок-схему алгоритма и программу на языке Basic или Pascal для решения задачи, включающей ввод исходных данных, организацию цикла, и выбора по заданному условию. Для проверочного решения значение параметра задачи "А" соответствует последней цифре шифра зачетной книжки плюс 5, параметр "В" предпоследней цифре шифра плюс 12.... https://www.cyberforum.ru/ turbo-pascal/ thread825364.html
Turbo Pascal Определить среднее арифметическое четных элементов массива 1.Дан двухмерный массив целых чисел.Определить среднее арифметическое четных элементов массива. 2.Дан двухмерный массив .Найти число пар одинаковых "соседних"элементов.В качестве "соседних" рассматриваются элементы,расположенные в одной строке или в одном столбце. 3.Дан двухмерный массив .Удалить из него первую из строк ,количество нулей в которой равно заданному числу n. 4.Дан двухмерный... https://www.cyberforum.ru/ turbo-pascal/ thread825362.html Найти количество слов в предложении,которые начинаются на букву m Turbo Pascal
найти количество слов в предложении,которые начинаются на букву m .Вывести эти слова
Turbo Pascal Нужно написать программу с использованием процедур https://www.cyberforum.ru/ turbo-pascal/ thread825353.html
Срочно нужна помощь! Нужно написать программу для вычисления по формуле, используя процедуры. Пожалуйста кто сможет помогите. Я уже просто запуталась. Пыталась написать программу, но она выдает кучу ошибок и не знаю как их исправить. в формуле нужно найти векторное произведение векторов - это в числителе. А в знаменателе нужно найти длины векторов. в файле приложенному к сообщению написана сама...
Turbo Pascal Найти число строк матрицы, сумма элементов у которых отрицательна https://www.cyberforum.ru/ turbo-pascal/ thread825347.html
Найти число строк матрицы А(n,m), сумма элементов у которых отрицательна.
Заменить все нулевые элементы матрицы на минимальный элемент Turbo Pascal
Дана целая матрица А(n,m). Заменить все нулевые элементы матрицы на минимальный элемент.
Turbo Pascal Подсчитать количество подряд идущих нечетных элементов массива Дан массив целых чисел а1,…, аn. Подсчитать количество подряд идущих нечетных элементов. https://www.cyberforum.ru/ turbo-pascal/ thread825338.html
0 / 0 / 0
Регистрация: 02.04.2013
Сообщений: 15
02.04.2013, 15:20  [ТС] 0

Найти область определения функции - Turbo Pascal - Ответ 4348478

02.04.2013, 15:20. Показов 1975. Ответов 3
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program test;
uses crt;
Var x,y:real;
begin
x:=-5;
while  x<=5 do
begin
x:=x+0.5;
write('x = ', x);
if ((x = -1.0) or (x = 1.0))
  then writeln(' функция неопределена')
  else writeln(' y = ', (x / (1.0 - x * x)));
 
end;
end.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program test;
uses crt;
Var x,y:real;
i:integer;
begin
for i:=-5  to 5 do
begin
x:=i+0.5;
write('x = ', x);
if ((x = -1.0) or (x = 1.0))
  then writeln(' Ôóíêöèÿ íå îïðåäåëåíà.')
  else writeln(' y = ', (x / (1.0 - x * x)));
 
end;
end.
так правильно будет?
и как через repeat until?

Вернуться к обсуждению:
Найти область определения функции Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.04.2013, 15:20
Готовые ответы и решения:

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

Найти область определения функции
1. y=A({x}^3-3*{x}^2+2)*cos(x), x принадлежит . Найти область определения функции D(f) ее нули,...

Найти область определения функции y=arccos(cosx)
Задача: Найти область определения функции y=arccos(cosx). Результат сделать в виде таблицы с...

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

3
02.04.2013, 15:20
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.04.2013, 15:20
Помогаю со студенческими работами здесь

Исследовать область определения и построить график функции
Форумчане, решите плиз эту задачу! Исследовать область определения и построить график функции:...

Исследовать область определения и построить график функции
Исследовать область определения и построить график функции. y = 3 +2 / sin (x).

Исследовать область определения функции и построить график
Исследовать область определения функции и построить график функций: y=x^3+2*x^2+x Заранее...

Вычислить выражение, учитывая область определения функции
запишите в языке паскаль выражение, учитывая область определения

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru