|
|
Другие темы раздела | |
Turbo Pascal Алгоритм подсчета подряд идущих элементов. Здравствуйте помогите пожалуйста с задачкой. Фишка в том что можно описать его даже на русском языке. Я вот никак не могу придумать(( Алгоритм подсчета максимального количетсва подряд идущих элементов каждый из которых больше предыдущего,в целочисленном массиве длины 30. Попробовал на паскале написать в качестве бреда через факториал...не получилось) Добавлено через 4 часа 37 минут Тоже... https://www.cyberforum.ru/ turbo-pascal/ thread192384.html |
Вывести количество чисел в наборе, меньших К Turbo Pascal Дано целое число К и набор ненулевых целых чисел; Признак его завершения - число 0. Вывести кол-во чисел в наборе, меньших К. Помогите! Пожалуйста! |
Turbo Pascal Сортировка (отредактить) Задача - "Отсортировать нечетные столбцы по убыванию." Нужно отредактировать так, чтобы в выводе числа не выводились автоматически, а чтобы нужно было их вводить собственноручно :( uses crt; const nmax=20; var a:array of integer; n,m,i,j,z:byte; tmp:integer; begin https://www.cyberforum.ru/ turbo-pascal/ thread192382.html |
Turbo Pascal Определить периметр многоугольника
https://www.cyberforum.ru/ turbo-pascal/ thread192375.html Ребят помогите, пожалуйста, написать программу на Pascal: Даны координаты вершин многоугольника (X1,Y1,X2,Y2,…,X10,Y10). Определить его периметр (вычисление расстояния между вершинами оформить подпрограммой) Нужно написать и с помощью функции и с помощью процедуры. Блок-схема тоже нужна. Помогите пожалуйста... я нуб в программировании... если не сдам эту лабу.. к зачету не допустит. :(... |
Turbo Pascal Определить сумму элементов, лежащих ниже главной диагонали исходной матрицы Значения элементов матрицы из L строк и M столбцов ввести из файла. Выполнить действия с элементами матрицы 1) Для случая, когда L=M, определить сумму элементов, лежащих ниже главной диагонали исходной матрицы. 2) В исходной матрице поменять местами значения К-ого и T-ого столбцов (значения К и T ввести с клавиатуры). Результаты выдать на экран. |
Turbo Pascal Текстовые данные, создания отдельных модулей Дан текст (слова разделены одним пробелом). Выполнить действия с текстом Результат выдать на экран 1я)Найти в тексте самое короткое слово. 2я)Определить сколько в тексте гласных и согласных букв. Выполнить задание с обязательным размещением подпрограмм в собственном модуле. https://www.cyberforum.ru/ turbo-pascal/ thread192372.html |
Turbo Pascal Поместить в массиве NFR только те элементы массива MAS10, которые находятся в диапазоне от 2 к 9. Поместить в массиве NFR только те элементы массива MAS10, которые находятся в диапазоне от 2 к 9. https://www.cyberforum.ru/ turbo-pascal/ thread192364.html |
Процедуры Turbo Pascal Описать процедуру Minmax(X, Y), записывающую в переменную X минимальное из значений X и Y, а в переменную Y — максимальное из этих значений (X и Y — вещественные параметры, являющиеся одновре¬менно входными и выходными). Используя четыре вызова этой процеду¬ры, найти минимальное и максимальное из данных чисел A, B, C, D. |
Turbo Pascal Создать программу при через процедуру. Описать процедуру Minmax(X, Y), записывающую в переменную X минимальное из значений X и Y, а в переменную Y — максимальное из этих значений (X и Y — вещественные параметры, являющиеся одновре¬менно входными и выходными). Используя четыре вызова этой процеду¬ры, найти минимальное и максимальное из данных чисел A, B, C, D. https://www.cyberforum.ru/ turbo-pascal/ thread192362.html | Turbo Pascal надо до18.11.2010 Помогите пожалуйста дана квадратная вещественная матрица n-го порядка.найти произведение значений наименьших элементов ее строк. https://www.cyberforum.ru/ turbo-pascal/ thread192360.html |
Ошибка в программе или в компиляторе Turbo Pascal У меня задача на арифметические операции с матрицами, вроде первый пример все зделал все нормально работает, а вот со вторым примером не как не могу понять ошибка моя или компилятора. Вроде все правильно сделал, выдает попытка присвоить переменной типа array of real тип real, вот задача(ошибка в 44 строке) Program Matr_arif; {Выполнить действие над правильными матрицами (6*A-B)+(0.5AB-BB}... |
Turbo Pascal Строки
https://www.cyberforum.ru/ turbo-pascal/ thread192355.html получить строку, состоящую из пяти звездочек (символов " * "). |
0 / 0 / 0
Регистрация: 02.10.2010
Сообщений: 19
|
|
0 | |
Вывести наименьшее из целых чисел N, для которых сумма будет больше A - Turbo Pascal - Ответ 111628916.11.2010, 21:15. Показов 2667. Ответов 4
Метки (Все метки)
Дано вещественное число А(>1). Вывести наименьшее из целых чисел N, для которых сумма 1+1/2+... +1/N будет больше A, и саму эту сумму.
Помогите! Пожалуйста! Вернуться к обсуждению: Вывести наименьшее из целых чисел N, для которых сумма будет больше A Turbo Pascal
0
|
16.11.2010, 21:15 | |
Готовые ответы и решения:
4
Вывести наименьшее из целых чисел N, для которых сумма ряда будет больше A Вывести наименьшее из целых чисел K, для которых сумма будет больше или равна N While: Вывести наибольшее из целых чисел K,для которых сумма 1+2+...+K будет меньше или равна N Вывести наибольшее из целых чисел К, для которых сумма 1+1/2+.+1/K будет меньше А, и саму эту сумму |
16.11.2010, 21:15 | |
16.11.2010, 21:15 | |
Помогаю со студенческими работами здесь
0
Дано число A (>1). Вывести найбольшее из целых чисел К, для которых сумма 1+1/2+.+1/k будет меньше А и саму эту сумму Вывести наименьшее из целых чисел K, для которых сумма 1 + 1/2 + … + 1/K будет больше A, и саму эту сумму. Дано вещественное число A (>1). Вывести наименьшее из целых чисел N, для которых сумма 1+…+1/N будет больше A, и сумму Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + . + 1/N будет больше A, и саму эту сумму |