Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Объясните условие Задача звучит так: Множество точек на плоскости задано своими координатами. Построить в декартовых координатах эти точки и выпуклую оболочку множества, то есть многоугольник минимальной площади, охватывающий все точки. Программа: uses crt, graphABC; var x:array of integer; y:array of integer; i,j,n,f,f1:integer; begin writeln('введите количество точек'); read(n); https://www.cyberforum.ru/ pascalabc-net/ thread1324234.html Оператор выбора. Присвоить переменной название k-го месяца после месяца m PascalABC.NET
условие задачи: type месяц = (янв,фев,мар,апр,май,июн,июл,авг,сен,окт,ноя,дек); var m1, m: месяц; Присвоить переменной m1 название k-го месяца после месяца m. помогите, решите.. :(
PascalABC.NET Выделить каждую букву "а" в слове знаком тире https://www.cyberforum.ru/ pascalabc-net/ thread1323841.html
Составьте программу, выделяющую каждую букву "а" в слове X знаком тире (-). вообще не понимаю ничего в этом программировании(((((( как сдать его... заранее спасибо за помощь! 		PascalABC.NET Составьте программу подсчета количества составных делителей натурального числа М, кратных 5 (с подпрограммой) Лабораторная работа №3 Элементарные задачи целочисленной арифметики (использование подпрограмм) Составьте программу подсчета количества составных делителей натурального числа М, кратных 5. ЗАРАНЕЕ СПАСИБО! :) https://www.cyberforum.ru/ pascalabc-net/ thread1323836.html
Найти максимальный и минимальный элементы на главной диагонали, и поменять эти строки местами PascalABC.NET
При помощи случайных чисел ввести матрицу размером 15х15. Найти максимальный и минимальный элементы на главной диагонали и поменять эти строки местами. Вывести на экран исходную матрицу, минимальный и максимальный элементы и матрицу после перестановки. 		PascalABC.NET Вывести время пребывания в очереди каждого покупателя, и номер человека с минимальным временем обслуживания Составить программу с использованием базовых алгоритмов для работы с одномерными массивами. В магазине стоит очередь, из 15 человек. Время обслуживания 1-го покупателя ti. Вывести время пребывания в очереди каждого покупателя, и номера человека, для обслуживания которого потребовалось минимальное время. https://www.cyberforum.ru/ pascalabc-net/ thread1323618.html
PascalABC.NET Вычислить и вывести на экран в виде таблицы значения функции, заданной графически Вычислить и вывести на экран в виде таблицы значения функции, заданной графически, на интервале от Xнач. до Xкон. с шагом dx. Интервал и шаг вводить с клавиатуры. Таблицу снабдить заголовком и шапкой. https://www.cyberforum.ru/ pascalabc-net/ thread1323610.html PascalABC.NET Определить, равна ли сумма двух первых цифр заданного четырехзначного числа произведению двух последних
Составить программу, печатающую значение true, если высказывание вашего варианта является истинным, и false - в противном случае. Данные для формирования условия должны вводиться с клавиатуры. При необходимости, выполнить проверку введенных данных. Сумма двух первых цифр заданного четырехзначного числа N равна произведению двух последних.
PascalABC.NET Определить среднюю плотность населения по области в целом https://www.cyberforum.ru/ pascalabc-net/ thread1323419.html
Здравствуйте, Гуру программирования или просто мастера. Такое дело, нужно написать одну программку. Сам ну никак не могу разобраться. По причине того что болел и пропустил довольно много материала. Суть в чем В области 12 районов. Известны кол-во жителей (в тысячах человек) и площадь (в км^2) каждого района. Определить среднюю плотность населения по области в целом. Задача такова. Думал ну ладно... 		PascalABC.NET Булевская функция в вызывающей программе https://www.cyberforum.ru/ pascalabc-net/ thread1323265.html
Доброго времени суток! Ребята, помогите разобраться. Мое задание: - алгоритм определения количества элементов, удовлетворяющих заданному условию. Условие задается булевской функцией в вызывающей программе. Я задаю условие в вызывающей программе, но она не производит подсчет кол-ва элементов в модуле. вот вызывающая программа: program lb12;
PascalABC.NET Метод пошаговой детализации
Разработать методом пошаговой детализации программу создания, просмотра, корректировки и поиска в типизированном файле, содержащего сведения о HDD: производитель, объём в Gb, характеристики, цена за единицу. Есть четыре программы которые выполняют эти действия по отдельности, необходимо сделать так, чтобы в зависимости от ввода выполнялась определенная функция. Программа, с помощью которой... 		PascalABC.NET Вычислить площадь, стороны, медианы и высоту треугольника Доброго времени суток, Форумчане! Попалась данная задачка: Написать процедуру и функцию, вычисляющую длины сторон, и площадь треугольника, заданного координатами вершин. В основной программе вычислить медиану и высоту треугольника. Код, разумеется, ПАСКАЛЬ.АБЦ Помогите составить эту клятую подпрограмму! Заранее благодарю всех, кто откликнулся!
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32835 / 21172 / 8148
Регистрация: 22.10.2011
Сообщений: 36,431
Записей в блоге: 8
09.12.2014, 10:50 0

Исключение из текста строк, содержащих заданный символ нечетное количество раз - PascalABC.NET - Ответ 6961995

09.12.2014, 10:50. Показов 812. Ответов 1
Метки (Все метки)

Ответ

Все гораздо проще:
Pascal
1
2
3
4
5
6
7
8
9

{$reference System.Core.dll}
uses System, System.IO, System.Linq, System.Collections.Generic;
 
var L : List<string> := new List<string>;
begin
  foreach st : string in &File.ReadAllLines('d:\test\input.txt') do
    if not Odd(st.ToCharArray().Where((ch : char) -> ch = '!').Count()) then L.Add(st);
  &File.WriteAllLines('d:\test\output.txt', L.ToArray());
end.


Вернуться к обсуждению:
Исключение из текста строк, содержащих заданный символ нечетное количество раз PascalABC.NET
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 09.12.2014, 10:50
Готовые ответы и решения:

Поиск в файле строк, содержащих заданный символ, с пропуском строк с определёнными порядковыми номерами
Имеется файл отчета otchet.txt. Найти строки содержащие значёк # (решетка). Но при поиске...

Определить количество слов в строке, содержащих заданный символ
С клавиатуры вводится строка, которая состоит из слов, разделенных одним или несколькими пробелами....

Как в исходной строке b$ определить количество слов, содержащих хотя бы один заданный символ x$
В исходной строке b$ определить количество слов, содержащих хотя бы один заданный символ x$.

Из текста удалить заданный символ, каждый раз сдвигая оставшуюся часть каждой строки “влево”
Из текста удалить заданный символ, каждый раз сдвигая оставшуюся часть каждой строки “влево”.

1
09.12.2014, 10:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 09.12.2014, 10:50
Помогаю со студенческими работами здесь

Написать программу,которая подсчитывает сколько раз заданный символ входит в данную строку текста
Дан текст.Написать программу,которая подсчитывает сколько раз заданный символ входит в данную...

Найти слова, в которых заданный символ встречается наибольшее количество раз
Доброе время суток еще раз :) Нужна помощь в написании программы на Асемблере. Буду благодарен за...

Найти и напечатать все слова строки, в которые заданный символ входит наибольшее количество раз
Задано текст, слова в котором разделены пробелами и разделительными знаками, и символ. Разработать...

Задана строка текста длиной не менее двадцати символов и задан один отдельный символ. Вычислить, какое количество раз этот символ встречается в строке
1. Ввести множество, запись или строку с помощью клавиатуры. 2. Вывести на экран монитора исходную...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru