|
|
Другие темы раздела | |
Free Pascal Напечатать текст из первых букв всех слов списка Пожалуйста, помогите написать програмку: Дано список слов. Напишите програму которая печатает текст из первых букв всех слов списка. Добавлено через 18 минут Соррян, это не стеки, а односвязные списки https://www.cyberforum.ru/ free-pascal/ thread1748878.html |
Free Pascal Составить программу выводящую фигуру буквы X 6 6 5 5 44 33 2 2 1 1 Как составить программу ,выводящую эту фигуру? |
Free Pascal Не получается сохранить записи
https://www.cyberforum.ru/ free-pascal/ thread1748387.html Народ! Помогите, пожалуйста, исправить ошибку в программе. У меня не получается сохранить записи, программа работает, но когда сохраняешь и нажимаешь клавишу Exit, она выходит и когда заходишь она не открывает сохранённые записи. И в программе съехали столбцы, я пыталась их выровнить, в самой программе убирала пробелы, но она ничего она не меняет. Я никак не могу это исправить. А завтра её нужно... |
Free Pascal Вычисление суммы рекурсивно и итеративно
https://www.cyberforum.ru/ free-pascal/ thread1748199.html Помогите сделать программу. В понедельник сдавать, а мне еще 9 программ писать. Все мельком глянул, вот только эту не знаю как сделать. Задача: Разработать программу согласно алгоритму с использованием рекурсивной функции и без использования рекурсивной функции. |
Free Pascal Вычислить сумму бесконечного ряда с точностью е program test; var u, s :real; z, n :integer; fac :longint; i :byte; const e=1e-3; x=0.25; begin fac:=1; s:=0; n:=0; |
Free Pascal Как из метода неопределенных коэффициентов сделать метод наименьших квадратов? что нужно поменять в программе чтобы решало методом наименьших квадратов? program m_n_k; uses crt; const m=5; n=m-1; h=0.1; fdata='data4_13.pas'; fres='res4_1_13.pas'; type vector=array of real; matrix=array of real; https://www.cyberforum.ru/ free-pascal/ thread1747892.html |
Free Pascal Деревья, обход по ярусам помогите пожалуйста сделать процедуру обход дерева по ярусам. например, если ярус четный,то посчитать сумму элементов на этом ярусе https://www.cyberforum.ru/ free-pascal/ thread1747638.html |
Free Pascal Найти в типизированном файле число повторяющиеся больше всего раз В типизированном файле записаны символы и числа найти целое число которое повторяется больше всего раз Помогите написать саму подпрограму нахождения числа |
Free Pascal Вычислить сумму бесконечного ряда с точностью е
https://www.cyberforum.ru/ free-pascal/ thread1746751.html Написать программу для обчисления суммы ряда с точностью е. program test; var u, s :real; z, n :integer; fac :longint; i :byte; const e=1e-3; x=0.41; begin fac:=1; s:=0; |
Free Pascal Не работают процедуры: неправильное количество параметров Осваиваю работу с процедурами, неправильное количество параметров для процедур, как устранить? Заранее спасибо) Program ars; uses crt; type MyArray = array of integer; Procedure input(var a : MyArray;var i,j,m,n: integer); begin writeln('vvedide kol-vo strok:'); https://www.cyberforum.ru/ free-pascal/ thread1746206.html |
Составить алгоритм работы программы Free Pascal program ToWords; uses IntToWord in 'IntToWord.pas'; var F_in: Text; line,S,Name:string; Sum,R:longint; Num:longint; |
Free Pascal Правильно ли написана процедура добавления элемента в конец очереди?
https://www.cyberforum.ru/ free-pascal/ thread1745755.html правильная процедура добавления элемента в конец очереди? подскажите пожалуйста procedure vnachalo(var p:list; x:integer ); {dobavlenie elem} var q:list; l:list; begin p:=l; if p<>nil then begin while p^.next<>nil do |
0 / 0 / 0
Регистрация: 21.04.2016
Сообщений: 8
|
|
30.05.2016, 11:26 [ТС] | 0 |
За один просмотр файла создать новый файл, в который будут записаны все слова наибольшей длинны - Free Pascal - Ответ 920766230.05.2016, 11:26. Показов 1037. Ответов 2
Метки (Все метки)
Ответ
Низкий поклон вам
Вернуться к обсуждению: За один просмотр файла создать новый файл, в который будут записаны все слова наибольшей длинны Free Pascal
0
|
30.05.2016, 11:26 | |
Готовые ответы и решения:
2
Получить новый файл, в котором все слова во всех предложениях исходного файла, записаны в обратном порядке Создать новый файл, в котором строки исходного будут записаны в обратном порядке Создать новый файл, в котором будут находиться все слова, длина которых будет наименьшей Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины |
30.05.2016, 11:26 | |
30.05.2016, 11:26 | |
Помогаю со студенческими работами здесь
0
Создать новый файл, содержащий все строки исходного файла наибольшей длины в обратном порядке Создать файл целых чисел. За один просмотр файла вывести на экран сначала все четные числа, а потом все нечетные Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины (в обратном порядке) |