Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
ribemosica
0 / 0 / 0
Регистрация: 01.05.2015
Сообщений: 2
1

Каждое слово разделенное '/' занести в переменную (или массив)

01.05.2015, 15:00. Просмотров 282. Ответов 1
Метки нет (Все метки)

Дана строка определенного вида.
Например: INTEL / Xeon Processor E5-2690 v3 / LGA2011-3 Square ILM / 3.5 ГГц / 135W / 64bit / HyperThreading /

Нужно каждое слово разделенное '/' занести в переменную(или массив)(на самом деле в поле Edit в delphi, но сути не меняет), что бы получилось, что-то вроде:

Pascal
1
2
3
4
5
6
7
8
9
10
A[1] := 'INTEL';
A[2] := 'Xeon Processor E5-2690 v3';
A[3] := 'LGA2011-3 Square ILM';
...
или
 
a := 'INTEL';
b := 'Xeon Processor E5-2690 v3';
c := 'LGA2011-3 Square ILM';
...
Как вам угодно, т.к. количество этих слов фиксированно.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.05.2015, 15:00
Ответы с готовыми решениями:

Дана строка, состоящая из русских слов, набранных заглавными буквами и разделительными пробелами (одним или несколькими). Преобразовать каждое слово в
Дана строка, состоящая из русских слов, набранных заглавными буквами и...

Текстовые файлы: Зашифровать текст, заменив каждое его слово на слово - "перевертыш"
Дан файл, содержащий некоторый текст (например, предложение). Зашифровать...

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

Дана строка 'математика 5', как 5-ку занести в численную переменную x?
cоnst mystr = 'математика 5'; var x:integer; как 5-ку занести в x!???

Преобразовать каждое слово в строке
Дана строка, состоящая из русских слов, набранных заглавными буквами и...

1
Puporev
Модератор
55472 / 42576 / 29425
Регистрация: 18.05.2008
Сообщений: 100,722
01.05.2015, 15:59 2
Pascal
1
2
3
4
5
6
7
n:=0;
while pos('/',s)>0 do
 begin
  n:=n+1;
  a[n]:=copy(s,1,pos('/',s)-1);
  delete(s,1,pos('/',s));
 end;
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.05.2015, 15:59

Удалить каждое чётное слово.
Помогите пожалуйста с задачей. В строке слова разделены пробелами. В процедуре...

Каждое слово заключить в кавычки.
Помогите пожалуйста. Каждое слово заключить в кавычки.

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


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

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

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