Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 25.05.2017
Сообщений: 13
1

Вывести последовательность цифр из входной последовательности и частоты их повторения в порядке возрастания цифр

23.04.2018, 21:21. Просмотров 666. Ответов 3

Доброго времени суток!
Очень нужна помощь с заданиями

 Комментарий модератора 
1-е задание удалено.



2)Задание:
На вход подаются произвольные алфавитно-цифровые символы. Ввод символов заканчивается восклицательным знаком. Требуется написать программу, которая будет печатать последовательность цифр из входной последовательности и через тире частот их повторения в порядке возрас-тания цифр.
Например, на вход подаются следующие символы: a8s7d8fgh8jjk7jjj48!
Программа должна вывести:
4-1
7-2
8-4
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.04.2018, 21:21
Ответы с готовыми решениями:

Вывести введенную последовательность в порядке возрастания первых цифр числа
.Задача звучит так:С клавиатуры водится некоторое количество чисел . Вывести их в порядке...

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

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

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

3
624 / 36 / 25
Регистрация: 25.04.2017
Сообщений: 439
Записей в блоге: 1
23.04.2018, 23:26 2
Victoria_1, здравствуйте ! Написал 2 задание , возможно грязновато , потому что на тяжелую голову, со слипшимися глазами, поздно.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
program two;
 
const
  dig: set of char = ['0'..'9'];
 
var
  s, q: string;
  i, j, k, count: integer;
  buf: char;
 
begin
  q := '';
  readln(s);
  k := length(s);
  for i := 1 to k do
    if s[i] in dig then
      q := q + s[i];
  count := 0;
  k := length(q);
  for i := 1 to k - 1 do 
    for j := i + 1 to k do
      if q[i] > q[j] then begin
        buf := q[i];
        q[i] := q[j];
        q[j] := buf;
      end;
  s := q;
  for i := 1 to k do 
  begin
    for j := 1 to k do
      if q[i] = s[j] then begin
        inc(count);
        s[j] := '#'; 
      end;
    if count > 0 then begin
      write(q[i], '-', count);
      writeln;
    end;
    count := 0;
  end;
end.
1
ZX Spectrum-128
24.04.2018, 09:01
  #3
 Комментарий модератора 
Victoria_1, создайте, пожалуйста, для 1-го задания отдельную тему.
0
0 / 0 / 0
Регистрация: 25.05.2017
Сообщений: 13
25.04.2018, 01:41  [ТС] 4
Спасибо Вам огромное, очень выручили
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.04.2018, 01:41

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Программа вывода последовательности цифр в порядке увеличения частоты их встречаемости
Болел два месяца — не знаю, что делать. На самом деле тут работы на две минуты: скопипастил всё...

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

Дана последовательность а0..аn. Вывести ина экран элементы этой последовательности в порядке возрастания
Дана последовательность а0..аn. Вывести ина экран элементы этой последовательности в порядке...

Дана строка символов, состоящая из цифр, разделенных пробелами. Вывести на экран числа этой строки в порядке возрастания
Добрый день. Дана строка символов, состоящая из цифр, разделенных пробелами. Вывести на экран числа...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.