|
|
Другие темы раздела | |
Turbo Pascal Запрограммировать добавления участника соревнований и его результаты
https://www.cyberforum.ru/ turbo-pascal/ thread1088499.html Известны Ф.И.О участников и хи результаты по прыжкам в высоту. Запрограммировать добавления участника и его результаты,удаления,просмотр всей таблицы в отсортированном виде(по убыванию результатов),поиск результата по фамилии и фамилий по результату. alex3208, Дублирование темы, а также кросспостинг (создание одинаковых тем в разных разделах) запрещены правилами форума. Не возбраняется... |
Turbo Pascal Найдите среднее арифметическое первого столбца матрицы Помогите пожалуйста решить задачу..В двухмерном массиве n на m найдите среднее арифметическое первого столбца и количество элементов в каждом из следующих столбцов, превышающих среднее арифметическое предыдущего столбца. Изобразите графически алгоритм и напишите программу для решения этой задачи. Добавлено через 1 час 43 минуты Есть код он не работает!! помогите доработать программу var... |
Turbo Pascal Вычислить интеграл b a f (x)dx методом левых прямоугольников
https://www.cyberforum.ru/ turbo-pascal/ thread1088491.html Вычислить интеграл f (x)dx заданным методом, воспольвавшись критерием двойного пересчета с точностью 10–6: s1 = 0, s2 = 0,5,dS = 0,1, t1=0,6 t2=1,8, dt=0,4, a = 0,1 d=дельта. |
Turbo Pascal Описать процедуры для выполнения следующих заданий дву- мя способами: используя механизм рекурсии и через цикл. Офор- мить процедуры в виде одного мод Описать процедуры для выполнения следующих заданий дву- мя способами: используя механизм рекурсии и через цикл. Офор- мить процедуры в виде одного модуля. Вычислить для заданного натурального n https://www.cyberforum.ru/ turbo-pascal/ thread1088486.html |
Turbo Pascal Дан массив действительных чисел, содержащий n элементов (n = 100, 200). Отсортировать массив двумя методами Дан массив действительных чисел, содержащий n элементов (n = 100, 200). Отсортировать массив двумя методами:сортировкой вставками и обменом. |
Turbo Pascal ОДЗ, вывести сообщение
https://www.cyberforum.ru/ turbo-pascal/ thread1088463.html 1.Найти область допустимых значений аргумента х. 2.Ввести аргумент х с помощью клавиатуры и определить, попадает ли он в область допустимых значений .В случае попадания аргумента х в область допустимых значений вычеслить значение выражения f(x) и вывести его на экран монитора, в случае не попадания в ОДЗ вывести об этом информационое сообщение. |
Turbo Pascal Выяснить, какие из точек находятся на максимальном расстоянии друг от друга Четыре точки заданы своими координатами X(x1, x2), Y(y1, y2), Z(z1, z2), P(p1, p2) Выяснить, какие из них находятся на максимальном расстоянии друг от друга и вывести на печать значение этого расстояния. Вычисление расстояния между двумя точками оформить в виде процедуры. Ребят помогите! https://www.cyberforum.ru/ turbo-pascal/ thread1088450.html |
Вычислить значение выражения Turbo Pascal i=a*sin(x+y)- b*cos(x+y)/sqrt(4*x*y), при значениях a=10;b=6,3;y=0,35; x принимает значения 0,6; 0,51; 0,42. Ничего не могу сделать, решил написать вам. |
Turbo Pascal Написание программы есть 2 задачи вообще не вкуриваю чё как ЗАДАНИЕ Выполните задание 1 используя подпрограмму-процедуру, задание 2, используя подпрограмму-функцию 1)Задана окружность (x-a)2 +(y-b)2 =r и две точки P=(p1,p2) и F=(f1,f2). Выяснить и напечатать, сколько точек (нуль, одна или две) лежит внутри окружности. Проверку, лежит ли точка https://www.cyberforum.ru/ turbo-pascal/ thread1088416.html |
Turbo Pascal Какое расстояние пройдёт пешеход за t2 часов?
https://www.cyberforum.ru/ turbo-pascal/ thread1088403.html Пешеход прошёл S1 км за t1 часов. Какой расстояние пройдёт пешеход за t2 часов? Напишите пожалуйста программу на Turbo Pascal. Program de; uses crt; var s1,s2,t1,t2,v :integer; begin clrscr; v := s1 / t1; s2 := v * t2; WriteLn(s2); |
Turbo Pascal Найти из непрерывных последовательностей отрицательных чисел ту, которая имеет наибольшее абсолютное значение среднего арифметического ее элементов Очень нуждаюсь в вашей помощи,дана размерность массива(20) Предел значений (-50 терэ 50)Благодарю всех за помощь или хотя бы за попытку помочь)Удачи всем8-) |
Turbo Pascal Вычислить значение корня методом Ньютона
https://www.cyberforum.ru/ turbo-pascal/ thread1088329.html Произвести расчет вычисленного значения корня (подробно), если за Х принять 3 т.е. как будет выглядеть само решение x1:=x0-fun(х0) ? Вот текст программы: program lab5; var x0,x1,a,b,e:real; iteraz:integer; function fun(x:real):real; |
-1 / 0 / 0
Регистрация: 04.01.2014
Сообщений: 72
|
|
04.02.2014, 12:20 [ТС] | 0 |
Подсчитать количество всех, непрерывных последовательностей положительных чисел, длина которых больше 7 - Turbo Pascal - Ответ 573675704.02.2014, 12:20. Показов 2672. Ответов 19
Метки (Все метки)
Ответ
Числа должны идти подряд. 1 2 3 4 5 6 7 8 к примеру
Я задаю две такие последовательности, а выводит, чтоесть только одна. Вернуться к обсуждению: Подсчитать количество всех, непрерывных последовательностей положительных чисел, длина которых больше 7 Turbo Pascal
0
|
04.02.2014, 12:20 | |
Готовые ответы и решения:
19
Подсчитать количество непрерывных последовательностей положительных чисел, длина которых больше 7 Вывести начальные индексы всех непрерывных последовательностей неотрицательных чисел, длина которых больше 5 Найти количество последовательностей положительных чисел, длина которых больше 7 Вывести начальные индексы всех непрерывных последовательностей отрицательных чисел |
04.02.2014, 12:20 | |
04.02.2014, 12:20 | |
Помогаю со студенческими работами здесь
0
Вывести начальные индексы всех непрерывных знакопеременных последовательностей чисел Вывести начальные индексы всех непрерывных последовательностей неотрицательных чисел Вывести начальные индексы всех непрерывных знакочередующихся последовательностей чисел Вывести начальные индексы всех непрерывных последовательностей чисел с неувеличивающимися значениями |