![]() |
|
Другие темы раздела | |
Pascal Отсортировать столбцы матрицы по убыванию дана целочисленная прямоугольная матрица. 1) отсортировать столбцы матрицы по убыванию количества элементов меньших элементов побочной диагонали. 2) определить минимальный из максимальных элементов строк и его положение.(Паскаль)Помогите пожалуйста((( https://www.cyberforum.ru/ pascal/ thread1337506.html |
Вычислить среднее арифметическое отрицательных нечетных элементов массива Pascal В одномерном массиве, состоящим из n элементов, вычислить: 1)Среднее арифметическое отрицательных нечетных элементов массива; 2)Cумму элементов массива, расположенных за вторым нечетным положительным элементом. сжать массив, удалив из него все элементы, модуль которых не превышает 1. Новый массив не заводить.(Паскаль). Спасайте ((( |
Pascal Файлы. Все элементы меньшие восьми возвести в третью степень Помогите , пожалуйста, с программой Ввести файл F . Все элементы меньшие восьми возвести в третью степень. Файл вывести до и после преобразования. Вот, что у меня получилось, Но не выводит числа в третью степень. program ABC; var b,i:integer; f:file of integer; begin assign(f,'f.dat'); writeLn('введите первую компоненту файла f'); https://www.cyberforum.ru/ pascal/ thread1337494.html |
Pascal Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово
https://www.cyberforum.ru/ pascal/ thread1337491.html Дана непустая последовательность слов из строчных русских букв, меду соседними словами-запятая,за последним словом - точка. Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово.(Паскаль) |
Pascal Вывести номера строки и столбца какой-нибудь седловой точки или число 0, если такой точки нет Процедуры и функции на использовать. Задан числовой массив A размером N × M. Некоторый элемент этого массива называется седловой точкой, если он является одновременно наименьшим в своей строке и наибольшим в своём столбце. Вывести номера строки и столбца какой-нибудь седловой точки или число 0, если такой точки нет. |
Pascal Одномерные массивы-Нули Помогите,исправить программу,выдаёт ошибку : Невозможно присвоить константному объекту const n = 10; x: array of integer =( 1, 2, 0, 4, 5, 0, 0, 7, 8, 9); var i, j: integer; numzero: integer; begin numzero := 0; https://www.cyberforum.ru/ pascal/ thread1337388.html |
Pascal Баланс открывающихся и закрывающихся скобок
https://www.cyberforum.ru/ pascal/ thread1337237.html Проверить, имеются ли в заданном тексте баланс открывающихся и закрывающихся скобок. |
Реализовать программу "Анкета" через параметры процедуры Pascal program tipizirovannye_parametry; const n=3; type anketa=record {фио , год рождения , должность можно записать в одну строку} fio: string; {Фамилия Имя Отчество} god:integer; {Год рождения типа integer , чтобы мы могли ввести год рождения , что нельзя сделать с типом byte,например} dol: string; {Должность} end; |
Pascal Написать программу, которая выводит на экран список учащихся, у которых стипендия меньше заданного значения
https://www.cyberforum.ru/ pascal/ thread1336931.html Написать программу, которая выводит на экран список учащихся, у которых стипендия меньше заданного значения, реализовать добавление и удаление записи из середины списка, вывода содержимого всего списка. |
Pascal Нахождение кратчайшего пути в графе при помощи алгоритма Дейкстры 1 Решение задач, реализуемых с помощью алгоритмов с возвращением 2 Нахождение кратчайшего пути в графе при помощи алгоритма Дейкстры - 35 - 15 - 45 - 30 - 30 - - - 25 - 25 60 - - 20 - 10 - 60 - буду очень благодарен https://www.cyberforum.ru/ pascal/ thread1336914.html |
Pascal Вывести на экран исходный текст построчно Здравствуйте! Подскажите, как написать программу: Задание на строки. В файле F:text задан текст, состоящий из непустой последовательности непустых слов из малых латинских букв, каждое слово состоит из не более чем 10-т и символов и записано в отдельной строке текстового файла F. Требуется вывести на экран (файл output): 1)исходный текст построчно 2)слова, которые содержат... |
Pascal Подсчитать количество ненулевых элементов, лежащих выше главной диагонали матрицы
https://www.cyberforum.ru/ pascal/ thread1336795.html Подсчитать количество ненулевых элементов, лежащих выше главной диагонали матрицы A(N,N), N<=40. Надо, чтобы она считала ненулевые элементы выше главной диагонали, включаю саму главную диагональ, только с того момента, когда на главной диагонали встретится число 99. Вот программа: const n=3; var k,i,j:integer; a:array of real; begin for i:=1 to n do for j:=1 to n do readln(a); k:=0; |
![]() 6809 / 4566 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
|
|
22.12.2014, 12:53 | 0 |
Описать логическую функцию, проверяющую, упорядочены ли по возрастанию элементы непустого файла - Pascal - Ответ 702143222.12.2014, 12:53. Показов 1180. Ответов 1
Метки (Все метки)
Ответ
Процедуры и функции. Работа с файлами.
Вернуться к обсуждению: Описать логическую функцию, проверяющую, упорядочены ли по возрастанию элементы непустого файла Pascal
0
|
|
22.12.2014, 12:53 | |
Готовые ответы и решения:
1
Описать логическую функцию, проверяющую, все ли числа, на которые ссылаются элементы вектора x, нечетные
Описать отдельную функцию проверки, упорядочены ли элементы заданного массива по возрастанию |
22.12.2014, 12:53 | |
22.12.2014, 12:53 | |
Помогаю со студенческими работами здесь
0
Помогите описать функцию, определяющую, упорядочены ли строго по возрастанию элементы в целочисленном массиве Описать логическую функцию, проверяющую на равенство файлы
Описать логическую функцию eq(f,q), проверяющую на равенство файлы f и g типа ФВ |