Перемена местами букв в слове и поиск совпадений в словаре - Pascal

  1. С горем пополам написал код для перестановки букв в введенном слове. Как сделать поиск полученных вариантов в словаре слов? Словарь русских слов в тхт формате. Например: ввожу слово beer Выдает варинты: beer bere bree eber ebre eebr eerb erbe ereb rbee rebe reeb. Нужно проверить есть ли какой нибудь вариант в словаре.


textual

Код к задаче: «Перемена местами букв в слове и поиск совпадений в словаре - Pascal»

const DictName='dict-ru.txt';
function DictFind(const s: String): Boolean;
var f: Text; t: String;
begin
  Assign(f,DictName); Reset(f); t:='';
  while not SeekEoF(f) and (t<s) do ReadLn(f,t);
  Close(f);
  DictFind:=t=s;
end;

СДЕЛАЙТЕ РЕПОСТ

10   голосов, оценка 4.400 из 5



Похожие ответы
  1. Дан двумерный целочисленный массив. Нужно поменять друг с другом выделенные красным цветом диагонали(над половиной главной диагонали и под половиной побочной).

  1. В заданном целом положительном числе N поменять местами наибольшую и наименьшую цифры. Предусмотреть случай, когда таких цифр нет.

  1. Здраствуйте. Мне нужна помощь при написании программы для изменения местами двух строк в матрице. Вот коментарий: Получаем матрицу А рандомно, выводим ее и потом, вводим значения номеров двух строк l,k(которые необходимо поменят местами) и вывести вторую матрицу B (в которой k,l поменялись местами) / Вот мой код

  1. В каждом столбце матрицы поменять местами последний и максимальный элемент.

  1. В каждой из матриц: А(3 строки, 4 столбца) и В(5 строк, 5 столбцов) поменять местами две строки: в матрице А - строки 2 и 3, в матрице В - строки 2 и 4. Для обмена в матрице строк с произвольными номерами использовать процедуру.

  1. . Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результат он объявляет игроку А. Игрок А проделывает с этим числом ту же процедуру, и так они продолжают поступать поочередно, объявляя числа. От суммы чисел берется остаток от деления на 100, поэтому объявляются лишь двузначные числа. Какие числа может объявить игрок А на начальном шаге, чтобы игрок В в некоторый момент объявил число 00.

  1. Всем привет. Помогите пожалуйста с задачей. В данной вещественной матрице размером nxm поменяйте местами строку, содержащую элемент с наибольшим значением, со строкой, содержащей элемент с наименьшим значением. Предполагается, что эти элементы единственные. Преподаватель сказал делать по примеру, но лично я ничего не понимаю в этом.Добавлено через 38 секунд

  1. Помогите написать программу , в матрице найти два столбца равными суммами сумами и поменять их элементы местами.

  1. Создайте одномерный массив, поменяйте местами последний элемент кратный В и первый элемент кратный С. В и С вводятся с клавиатуры. Программа запускается и зависает после пересылки значений в процедуру lol, скорее всего в ней зацикливается.