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

Узнай цену своей работы

Формулировка задачи:

Здравствуйте, может кто-нибудь подсказать как выполнить эту задачу. Суть в том, что программа считывает введенное слово (не больше 14 букв) и выводит на экран буквы этого слова в случайном порядке (на латинеце), прибавляя к ним ещё рандомные буквы. Итого на экран программа должна вывести 14 символов Например: Ввод: hello Вывод: rteftlulhoalno

Решение задачи: «Программа, которая выводит буквы введенного слова в случайном порядке»

textual
Листинг программы
var
  s:string[14];
  c:char;
  i,j:byte;
begin
  randomize;
  write('введите слово:');readln(s);
  for i:=length(s)+1 to 14 do s:=s+chr(random(26)+97);
  for i:=1 to 14 do begin
    j:=random(14)+1;
    c:=s[i];
    s[i]:=s[j];
    s[j]:=c;
   end;
   writeln('результат:',s);
   readln
end.

Объяснение кода листинга программы

  1. Объявление переменных:
    • s: строковая переменная длиной до 14 символов
    • c: символьная переменная
    • i, j: переменные типа byte (целые числа от 0 до 255)
  2. randomize: инициализация генератора случайных чисел.
  3. Запрос ввода слова и сохранение введенного значения в переменной s.
  4. Добавление случайных символов к строке s, чтобы ее длина достигла 14 символов.
  5. Цикл для перемешивания символов:
    • i принимает значения от 1 до 14.
    • Генерируется случайное число j от 1 до 14.
    • Символ c принимает значение символа s[i].
    • Символ s[i] заменяется символом s[j], а символ s[j] заменяется символом c.
  6. Вывод результирующей строки s.
  7. Ожидание ввода перед завершением программы. Программа перемешивает символы введенного слова и выводит их в случайном порядке, дополняя при необходимости случайными символами до 14 символов.

Оцени полезность:

8   голосов , оценка 4 из 5
Похожие ответы