Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Подсчет смежных элементов Вводится кол-во строк и столбцов с клавиатуры, затем они заполняются символами '#'. Затем некоторые элементы заменяются на случайное количество '.' Необходимо подсчитать кол-во смежных(по вертикали и горизонтали) '#' и вывести число на экран. Сама таблица получается такая: 8 4 . . # # . . # # # # . # . . . # # # # # https://www.cyberforum.ru/ turbo-pascal/ thread1894670.html Подправить диапазон Turbo Pascal
Помогите поправить нужно увеличить диапазон в условие на малом кубе чтоб когда круг дошел до центра меньшего куба происходила замена на 2 большой куб. uses graph,crt; var escape : char; x, y,x5,y5: integer; x11,y11,x12,y12:integer; gd, gm, p, p1 : integer; x2,y2,r1:integer; xd, yd,rad,a,b,l,kut: integer; {Dlya cuba}
Turbo Pascal Заминка или особенность с турбо паскалем https://www.cyberforum.ru/ turbo-pascal/ thread1893611.html
Ребят , подскажите : обязательно ли в турбо паскаль при выполнении програмы каждый раз , для получения какого либо результата нажимать alt+f5 ? Добавлено через 17 минут или может сбросьте ссылочку на нормальный паскаль . Огромное спасибо за помощь ! 		Turbo Pascal Описать функцию подсчитывающую сколько дней прошло от первого января 2005 года до даты d этого года. https://www.cyberforum.ru/ turbo-pascal/ thread1893399.html
Дан массив записи, представляющий собой календарь(число,месяц,год). Описать функцию подсчитывающую сколько дней прошло от первого января 2005 года до даты d этого года.
Строка: Разбить исходную строку в соответствии с шириной поля вывода N Turbo Pascal
Дана строка и число N. Разбить исходную строку в соответствии с шириной поля вывода N. 		Turbo Pascal Удалить из данной строки слова, содержащие заданную последовательность символов https://www.cyberforum.ru/ turbo-pascal/ thread1893325.html
Удалить из данной строки слова, содержащие заданную последовательность символов. не используя функции delete и pos.
Turbo Pascal Написать условие В общем есть 2 куба 1 большой, 2 меньше и круг Нужно написать условие чтоб когда круг пересекался с меньшим кубом появлялся большой, а меньший стирался. uses graph,crt; var escape : char; x, y,x5,y5: integer; x11,y11,x12,y12:integer; gd, gm : integer; x2,y2,r1:integer; https://www.cyberforum.ru/ turbo-pascal/ thread1892664.html Turbo Pascal Строки и множества. Случайным образом заполнить множество рабочих дней в цикле из 6 повторений
Строки и множества. Случайным образом заполнить множество рабочих дней в цикле из 6 повторений.
Turbo Pascal Вычислить значения функции https://www.cyberforum.ru/ turbo-pascal/ thread1891861.html
Вычислить значения функции. Z=\begin{cases}\sqrt{x+t} & \text{ npu } 0\,<\,x\,<\,0.5 \\ \sqrt{x+t}+\frac{1}{x} & \text{ npu } x=0.5 \\ \cos x+t\sin ^2x & \text{ npu } x\,>\,0.5\end{cases}\ \ \ \ t=2.2 		Turbo Pascal Вычислите значения функции Вычислите значения функции. \begin{array}{|l|l|}\ \ \ Y=\begin{cases}x^3+4 & \text{ npu } x\,<\,0 \\ \operatorname{tg}x-8 & \text{ npu } x\,>\,0 \end{cases}\ \ \ \ & \begin{array}{l}\ \ \ x=0.8\ \ \ \\\ \ \ x=11.36\ \ \ \\\ \ \ x=-5.54\ \ \ \end{array}\end{matrix} https://www.cyberforum.ru/ turbo-pascal/ thread1891860.html
Turbo Pascal Может ли программа дополнять саму себя?
Более подробно: может ли программа скопировать код подпрограммы (т.е., сделать, так сказать, copy-paste) в место вызова и подставить вместо формальных параметров фактические. Поясню. Пусть имеется некоторая main программа. В программе хранится некоторая подпрограмма «subroutA» в ждущем режиме, т.е., она не задействована в вычислениях. При выполнении программы в определенном месте возникает... 		Turbo Pascal Отсортировать элементы столбцов матрицы по возрастанию Дана матрица А размера n*n, где n<=15. Элементы матрицы вычисляются по формуле a(i,j)= i*j*sin(0.5*i*j). Значения элементов округлять до двух знаков после запятой. Отсортировать элементы в столбцах по возрастанию. https://www.cyberforum.ru/ turbo-pascal/ thread1891770.html
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
10.01.2017, 17:07 0

Разработать алгоритм и составить программу вычисления таблицы значений функции - Turbo Pascal - Ответ 9989597

10.01.2017, 17:07. Показов 2218. Ответов 7
Метки (Все метки)
Лучший ответ Сообщение было отмечено Arlequin228 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

uses crt;
var a,b,h,z,x,s,t:real;
    k:integer;
begin
clrscr;
repeat
writeln('Введите диапазон a<b');
readln(a,b);
until a<b ;
repeat
write('Введите шаг h<',b-a:0:1,' h=');
readln(h);
until h<b-a;
repeat
write('Введите точность 0<z<1 z=');
readln(z);
until(z>0)and(z<1);
x:=a;
while x<b+h/2 do
 begin
  k:=0;
  t:=1;
  s:=t;
  while abs(t/(2*k+1))>z do
   begin
    k:=k+1;
    t:=-t*x*x/k;
    s:=s+t/(2*k+1);
   end;
  s:=2*x*s/pi;
  writeln('x=',x:6:2,' f=',s:8:4);
  x:=x+h;
 end;
readln;
end.


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

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

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

Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)
Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)....

Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)
Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)....

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

Разработать программу и составить программу вычисления и вывода таблицы значений
Разработать алгоритм и составить программу вычисления и вывода на дисплей таблицы значений сумм...

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

Составить алгоритм и написать программу вычисления значений функции
Составить алгоритм и написать программу вычисления значений функции F (x) на отрезке * с шагом h....

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

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