Упорядочить слова предложения по алфавиту

@demorate · Регистрация: 06.03.2011

Студворк — интернет-сервис помощи студентам

У меня чего то не получаеться перевести с паскаля на си задачи по строкам!

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
var
  s: array[1..100] of string;
  sb, sb0: string;
  i, j, k: byte;
 
begin
 
  writeln('Введите строку:'); readln(sb0);
  k := 1;
  for i := 1 to length(sb0) - 1 do
    if (sb0[i] <> ' ') or (sb0[i + 1] <> ' ') then sb := sb + sb0[i];
  sb := sb + sb0[length(sb0)];
  
  for i := 1 to length(sb) do
  begin
    if sb[i] <> ' ' then s[k] := s[k] + sb[i];
    if sb[i] = ' ' then k := k + 1;
  end;
  
  for j := 1 to k - 1 do
    for i := 1 to k - j do
      if s[i] > s[i + 1] then
        swap(s[i], s[i + 1]);
  
  writeln();
  writeln('Слова по алфавиту: ');
  for i := 1 to k do
    writeln(s[i]);
end.

начинаю переводить и выскакивает почти на каждом шагу ошибки...

@demorate · 04.06.2011, 17:57 **[ТС]**

Дано предложение, которое состоит из слов, разделенных одним или несколькими пробелами. Упорядочить слова предложения по алфавиту.

@diagon · 04.06.2011, 18:40

3)Получилось некрасиво, так как плохо знаю си, но вроде работает.

C
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
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#define size 100
struct words{char s[size];};
int main ()
{
  char str[] ="Predlogenie, sostoyashee iz slov.";
  char * pch;
  int n=0;
  words w[16];
  printf("words:\n");
  pch = strtok (str," ,.-");
  while (pch)
  {
    strcpy(w[n++].s,pch);
    printf ("%s\n",pch);
    pch = strtok (NULL, " ,.-");
  }
  for (int i=0; i < n-1;i++)
    for (int j=i+1; j < n; j++)
        if (toupper(w[i].s[0])>toupper(w[j].s[0])) {char temp[size];strcpy(temp,w[i].s);strcpy(w[i].s,w[j].s);strcpy(w[j].s,temp);}
  printf("Sorted words:\n");
  for (int i=0; i < n; i++)
    printf("%s\n",w[i].s);
  return 0;
}

@йцукенг · 06.06.2011, 21:28

Сообщение от diagon

3)Получилось некрасиво, так как плохо знаю си, но вроде работает.

C
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
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#define size 100
struct words{char s[size];};
int main ()
{
  char str[] ="Predlogenie, sostoyashee iz slov.";
  char * pch;
  int n=0;
  words w[16];
  printf("words:\n");
  pch = strtok (str," ,.-");
  while (pch)
  {
    strcpy(w[n++].s,pch);
    printf ("%s\n",pch);
    pch = strtok (NULL, " ,.-");
  }
  for (int i=0; i < n-1;i++)
    for (int j=i+1; j < n; j++)
        if (toupper(w[i].s[0])>toupper(w[j].s[0])) {char temp[size];strcpy(temp,w[i].s);strcpy(w[i].s,w[j].s);strcpy(w[j].s,temp);}
  printf("Sorted words:\n");
  for (int i=0; i < n; i++)
    printf("%s\n",w[i].s);
  return 0;
}

Можете поправить програмку, т.к. мой компилятор ругаеться и я не знаю как поправить это!

@diagon · 07.06.2011, 07:29

На что именно?
Ошибку и строку, на которую ругается в студию.

@йцукенг · 07.06.2011, 07:58

Третья задача ругаеться.
Сначала на words w[16];
потом strcpy(w[n++].s,pch);
ну пока что только в этих строках.

@diagon · 07.06.2011, 08:14

о_О
Странно...
Попробуйте words на что-нибудь другое заменить, возможно у вас это слово уже занято.

@йцукенг · 07.06.2011, 08:33

Оно ругаеться скорее всего на ...w[16]; т.к. при перемене все равно ругаеться.

@dihlofos · 07.06.2011, 08:58

йцукенг, напиши лучше текст ошибки. Возможно стоит сделать так:

C++
1
typedef struct { char s[size]; } words;

Новые блоги и статьи Все статьи Все блоги /
My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача №1: при указании работ (справочник РаботыПоРемонтуСпецтехники),. . .

@demorate 1 / 1 / 0 Регистрация: 06.03.2011 Сообщений: 34
	04.06.2011, 17:57 [ТС]
	Дано предложение, которое состоит из слов, разделенных одним или несколькими пробелами. Упорядочить слова предложения по алфавиту. 0

@diagon Higher 1953 / 1219 / 120 Регистрация: 02.05.2010 Сообщений: 2,925 Записей в блоге: 2
	07.06.2011, 07:29
	На что именно? Ошибку и строку, на которую ругается в студию. 0

@йцукенг 0 / 0 / 0 Регистрация: 21.05.2011 Сообщений: 6
	07.06.2011, 07:58
	Третья задача ругаеться. Сначала на words w[16]; потом strcpy(w[n++].s,pch); ну пока что только в этих строках. 0

@diagon Higher 1953 / 1219 / 120 Регистрация: 02.05.2010 Сообщений: 2,925 Записей в блоге: 2
	07.06.2011, 08:14
	о_О Странно... Попробуйте words на что-нибудь другое заменить, возможно у вас это слово уже занято. 0

@йцукенг 0 / 0 / 0 Регистрация: 21.05.2011 Сообщений: 6
	07.06.2011, 08:33
	Оно ругаеться скорее всего на ...w[16]; т.к. при перемене все равно ругаеться. 0