Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Определенный интеграл методом Симпсона Нормально ли, что у площади по формуле Ньютона и метода Симпсона идентичные значения? Как можно исправить. Заранее спасибо . Вот код: uses crt; var y,x,s,h,a,b:real; k:integer; n:byte; function f(x:real):real; begin f:=1*(x*x*x)+0*(x*x)+(-4)*x+12; //Заданная функция end; https://www.cyberforum.ru/ pascalabc-net/ thread2552194.html PascalABC.NET Двумерный массив. Паскаль
Составить программу, которая в двумерном массиве 15 на 15 найдёт в каждой строке наибольший элемент и поменяет его с элементами на главной диагонали. Полученный результат выводится на экран
PascalABC.NET Составить программу, которая в текстовом файле удаляет все знаки препинания https://www.cyberforum.ru/ pascalabc-net/ thread2552133.html
Составить программу, которая в текстовом файле удаляет все знаки препинания.
PascalABC.NET Исправить ошибку. Исправите, пожалуйста, ошибку! program while_3; var n, r, a:integer; Var k,i: array of integer; begin readln (n); k:= 0; while n >0 https://www.cyberforum.ru/ pascalabc-net/ thread2552032.html
PascalABC.NET Построить множество чисел, кратных 4, используя свойство делимости на 4
Для интервала от 1 до 255 построить множество чисел, кратных 4, используя свойство делимости на 4, если число, образованное двумя последними цифрами делится на 4, тогда все число делится на 4
PascalABC.NET Анимируйте мой рисунок https://www.cyberforum.ru/ pascalabc-net/ thread2551937.html
Ребята, можете пожалуйста анимировать катер, чтобы он скользил по морской глади) program prizma ; uses graphABC; begin setpenwidth(2); setWindowSize(1000,800); ClearWindow(clWhite);
PascalABC.NET Задано натуральное число n. Найти сумму его цифр https://www.cyberforum.ru/ pascalabc-net/ thread2551911.html
Заданное натуральное число n. Найти сумму его цифр.
PascalABC.NET В каждой строке двумерного массива (n × m) поменять местами первый и максимальный элементы строки
В каждой строке двумерного массива (n × m) поменять местами первый и максимальный элементы строки.
PascalABC.NET Получить файл g, образованный из файла f заменой всех заглавных латинских букв одноименными строчными https://www.cyberforum.ru/ pascalabc-net/ thread2551729.html
дан текстовый файл f получить файл g образованный из файла f заменой всех заглавных латинских букв одноименными строчными и наоборот. Помогите , что нужно дополнить. Эта программа только заглавные буквы меняет на строчные, а строчные на заглавные нет uses crt; var f,j:file of char; c:char; begin assign(f,'fileF'); rewrite(f); assign(j,'fileG'); rewrite(j);
PascalABC.NET Необходимо перевести программу с языка ПАСКАЛЬ на МАТЛАБ https://www.cyberforum.ru/ pascalabc-net/ thread2551645.html
type m2 = arrayof real; a1 = arrayof real; var a{матрица коэффицентов перед неизвестными}: a1; i{переменная цикла}, j{переменная цикла}, n{порядок матрицы}: integer; f{правая часть}: m2; f1{файл из которого читается матрица}: file of real; z{переменная с помошью которой находится порядок матрицы при чтении ее из файла}: real;
PascalABC.NET Нужно перевести прогу с Паскаль на Матлаб
type m2 = arrayof real; a1 = arrayof real; var a{матрица коэффицентов перед неизвестными}: a1; i{переменная цикла}, j{переменная цикла}, n{порядок матрицы}: integer; f{правая часть}: m2; f1{файл из которого читается матрица}: file of real; z{переменная с помошью которой находится порядок матрицы при чтении ее из файла}: real;
PascalABC.NET Отсортировать массив по не возрастанию методом распределения по массиву ключей, упорядоченному по не возрастанию https://www.cyberforum.ru/ pascalabc-net/ thread2551517.html
Отсортировать массив по не возрастанию методом распределения по массиву ключей, упорядоченному по не возрастанию.
2308 / 1419 / 516
Регистрация: 07.04.2017
Сообщений: 4,723
12.12.2019, 20:49 0

Найти строки, содержащие все символы из заданной подстроки - PascalABC.NET - Ответ 14088968

12.12.2019, 20:49. Показов 650. Ответов 1
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
begin
  var s := ReadString.ToHashSet;
  
  ReadArrString(ReadInteger('n ='))
  .Where(l->not s.Except(l).Any)
  .PrintLines;
  
end.


Вернуться к обсуждению:
Найти строки, содержащие все символы из заданной подстроки PascalABC.NET
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.12.2019, 20:49
Готовые ответы и решения:

Типизированный файл: Найти строки, в которых все символы заданной подстроки входят не более одного раза
Помогите, пожалуйста, сделать задачу. 1 На основе текстового файла, содержащего в каждой строке...

Найти все слова, содержащие хотя бы одно вхождение заданной подстроки
Дан массив из слов X(n). Найти все слова, содержащие хотя бы одно вхождение заданной подстроки.

Строки. Выделить из строки все подстроки, содержащие числа, и преобразовать в тип integer
Буду очень признателен если вы поможете с этим заданием. А задание таково: у нас есть строка S, она...

Определить, входят ли в заданную строку все символы заданной подстроки
Задание:Определить, входят ли в заданную строку все символы заданной подстроки Нужно использовать...

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

Определить, входят ли в заданную строку все символы заданной подстроки
Определить, входят ли в заданную строку все символы заданной подстроки. Cтроки С «с нулем», при...

Распечатать все строки файла, содержащие заданную строку в качестве подстроки
Программированием занимаюсь месяц, но что-то сижу на этой задаче долго. Нужно распечатать все...

Исключить из заданной строки S1 все вхождения заданной подстроки S2
Исключить из заданной строки S1 все вхождения заданной подстроки S2. Вроде получучается в коде дано...

Распечатать все строки данного файла, содержащие заданную строку в качестве подстроки
Распечатать все строки данного файла, содержащие заданную строку в качестве подстроки. Имя файла и...

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