![]() |
|
Другие темы раздела | |
Pascal Файл содержит записи о дате. Указать максимальную дату для второй половины года Помогите с решением Создать файл, содержащий записи о дате: день (1..31), месяц (1..12), год (00..99). Обработать этот файл и указать максимальную дату для второй половины года. uses crt; type data=record d,m,g:integer end; var f:file of data; n,i,k:integer; d,mx:data; begin clrscr; assign(f,'daty'); |
Pascal Создать программу: Одномерный массив в котором: сначало повторяющиеся элементы Помогите плиз, через пару часов сдача... Создать одномерный массив А, переделать его таким образом, чтобы с начало были записаны элементы, которые встречаются несколько раз. Очень срочно... const mmax = 50; var a:array of integer; i,j,m,tmp,k:integer; begin repeat write ('Razmer massiva: '); readln(m); until m in ; https://www.cyberforum.ru/ pascal/ thread927401.html |
Pascal Сравнение record в Pascal похоже на структурі в С++? напишите сходство и различие. record в Pascal похож на struct в C, в С++ struct может выполнять роль, как классической структуры(в стиле C), так и класса. По сути, struct от class в C++ отличает только модификатор доступа по... https://www.cyberforum.ru/ pascal/ thread927390.html | Pascal 2. В массив A[n] занесены натуральные числа. Найти произведение всех элементов В массив A занесены натуральные числа. Найти произведение всех элементов. uses crt; var a: array of byte; p, t: longint; n: byte; begin p := 1; https://www.cyberforum.ru/ pascal/ thread928774.html |
Pascal Разработать программу поиска прямой речи в тексте
https://www.cyberforum.ru/ pascal/ thread925902.html Текст состоящий из примерно 20 строк, в котором нем нужно найти количество предложений с прямой речью. MyBrainStem, программу в студию. Если программа не считывает по символам, то лучше пусть она делает это так. |
Pascal Программа на паскале. на модули и структуры
https://www.cyberforum.ru/ pascal/ thread924029.html Всем доброго времени суток! Пишу задание для практики на Паскале, по такому заданию Программа должна иметь модульную структуру Каждое задание должно быть оформлено в виде отдельного модуля... при компелировании на АБС ему не нравится IoResult Потому что в АВС нужно Procedure ReadThird(Var mas: vec2); begin if not fileexits('third.in') then begin Writeln('No input file'); ... |
остатки при делении квадратов Pascal Есть число n (оно от 1 до 20). Требуется найти, сколько различных остатков при делении на n дают квадраты натуральных чисел. Думаю так: n ^ 2 даст в остатке 0, дальше если продолжать проверять квадраты, будет период. Соответственно, нужно проверить только первые n квадратов, и подсчитать количество различных остатков:... |
Программа, которая записывает в файл типа byte 100 случайных чисел от 0 до 255 Pascal Здравствуйте уважаемые форумчане, помогите пожалуйста с задачей: Создайте программу, которая записывает в файл типа byte 100 случайных чисел от 0 до 255 и программу, которая выводит на экран... program kontra; uses crt; const n=100; var a, i , d:byte; f:file of byte; fname:string; BEGIN clrscr; randomize; assign(f,'file'); |
Pascal Числа, делящиеся на 41
https://www.cyberforum.ru/ pascal/ thread924490.html Среди всех чисел от 0 до 1 000 000, делящихся на 41, нужно найти то число, у которого больше всего троек в записи. uses crt; var i,j,k,c,a,mx:longint; begin clrscr; mx:=0; i:=41; while i<=1000000 do begin j:=i; k:=0; |
Pascal Определить количество знаков препинания в тексте из 20 строк Доброго времени суток Помогите, пожалуйста, с программой. Необходимо подсчитать количество знаков препинания вне главной диагонали матрицы. Добавлено через 1 час 37 минут program Perfect; ... Const n=20; z=; Var s: Array of String; k: Integer; i,j: Byte; BEGIN k:=0; Writeln('Введите текст из ',n,' строк: '); |
Pascal Найти количество пар натуральных чисел, где одно из чисел делится на другое
https://www.cyberforum.ru/ pascal/ thread922984.html Есть число n, оно от 1 до 1000. Нужно найти количество пар натуральных чисел, где одно из чисел делится на другое. Числа не превосходят n. алгоритм динамический. В цикле находишь решение сначала для 1 2 потом для 1 2 3 потом для 1 2 3 4 и.т.д. Зачем перебирать решения сначала? потому что в Nное решение входят все пары, найденные... |
Pascal Реализация двоичного дерево поиска. Pascal.
https://www.cyberforum.ru/ pascal/ thread929245.html Я вот долго лазил по нету, нашел только один "корявый" код реализации красно-черного дерева. Что касается двоичного дерева поиска...где-то поставленые задачи почти эквивалентны просто тому, чтобы... |
![]() 8 / 8 / 3
Регистрация: 07.04.2013
Сообщений: 85
|
|||||||||||
28.07.2013, 15:26 | 0 | ||||||||||
Задание со стеками и очередями: Содержимое файла f переписать в файл g, перенося цифры в конец строки - Pascal - Ответ 489080528.07.2013, 15:26. Показов 1716. Ответов 3
Метки (Все метки)
Ответ
Добавлено через 6 минут Ну а вот и решение с очередью) Clear - выводит все в файл g, а push добавляет строку в очередь.
Вернуться к обсуждению: Задание со стеками и очередями: Содержимое файла f переписать в файл g, перенося цифры в конец строки Pascal
2
|
28.07.2013, 15:26 | |
Готовые ответы и решения:
3
Очереди: Содержимое текстового файла переписать в новый файл, перенося цифры в конец строки Переписать содержимое файла А в файл В, перенося при этом в конец каждой строки все входящие в нее знаки препинания Составное текстового файла f, разделенное на строки, переписать в текстовый файл g, перенося при этом в конец каждой строки все цифры, входящие в него |
28.07.2013, 15:26 | |
Помогаю со студенческими работами здесь
0
Переписать все из файла А в файл В, перенося в конец каждой строки все входящие в нее знаки препинания Переписать все цифры каждой строки файла в конец строки
Переписать в новый файл все строки файла, вставив в конец каждой строки ее номер |
Новые блоги и статьи
![]() |
||||
Создаем SPA Router на чистом JavaScript
bytestream 17.02.2025
В современной веб-разработке одностраничные приложения (SPA) стали стандартом для создания динамичных и отзывчивых пользовательских интерфейсов. Ключевым компонентом любого SPA является роутер -. . .
|
Машинное обучение на TypeScript и TensorFlow
bytestream 17.02.2025
Машинное обучение становится все более востребованным направлением в современной разработке программного обеспечения. Интеграция искусственного интеллекта в веб-приложения открывает новые возможности. . .
|
Манипуляция данными EXIF и JPEG в JavaScript
bytestream 17.02.2025
В современном мире цифровой фотографии метаданные изображений играют важнейшую роль в организации и управлении медиаконтентом. Формат EXIF (Exchangeable Image File Format) - это стандарт,. . .
|
Как создать GUID/UUID в JavaScript
bytestream 17.02.2025
GUID (Globally Unique Identifier) и UUID (Universally Unique Identifier) - это специальные форматы 128-битных идентификаторов, которые практически гарантируют уникальность значения во времени и. . .
|
Что такое мышление в упрощенном смысле (моё субъективное видение, для создания модели).
Hrethgir 17.02.2025
Разумеется упрощать смысл есть. Дело в том, что я пришёл к тому выводу, что даже если я создам свой процессор (конвейер), то первое для чего смогу его использовать в качестве демонстративного. . .
|
Как Node.js устроен изнутри
Wired 17.02.2025
Node. js коренным образом изменил подход к веб-разработке, позволив использовать JavaScript не только в браузере, но и на стороне сервера. Созданный в 2009 году Райаном Далем, Node. js представляет. . .
|
Как обновить Node.js в Windows
Wired 17.02.2025
Думаю, многие разработчики сталкивались с ситуацией, когда устаревшая версия Node. js становилась источником проблем - от несовместимости с новыми пакетами до уязвимостей в безопасности. Особенно это. . .
|
Как обновить Node.js в MacOS
Wired 17.02.2025
В Node. js существует несколько подходов к обновлению, каждый из которых имеет свои преимущества и особенности применения. Выбор конкретного метода зависит от ваших потребностей - будь то. . .
|
Как обновить Node.js в Linux
Wired 17.02.2025
Обновление Node. js может показаться сложной задачей, особенно если у вас несколько проектов с разными зависимостями. Однако существует несколько надежных способов обновления, подходящих для разных. . .
|
[golang] 134. Gas Station
alhaos 17.02.2025
Тут нам даны два целочисленных слайса gas и cost, индексы массива представляют собой заправочные станции. а элементы gas это количество топлива на такой станции, cost это количество топлива. . .
|