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

из заданного теста выбрать цифры и записать в массив N ,а буквы - в массив B .Все остальные символы записать в массив S

05.01.2010, 23:43. Просмотров 944. Ответов 2
Метки нет (Все метки)

Привет всем.Помогиет пожалуйста решить задачку
из заданного теста выбрать цифры и записать в массив N ,а буквы - в массив B .Все остальные символы записать в массив S.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.01.2010, 23:43
Ответы с готовыми решениями:

Записать в массив сначала все положительные числа, затем все остальные, сохраняя порядок
Привет.Помогите решить данную задачу;( Дан массив из N целых чисел. Записать...

дан массив а состоящий из к целых положительных чисел. Записать все четные по значению элементы массива а в массив b
дан массив а состоящий из к целых положительных чисел. Записать все четные по...

Дан массив целых чисел, содержащий 10 элементов. Составить новый массив, записать в него сначала все положительные элементы исходного массива
, потом все отрицательные элементы, потом нули... Да прибудет с вами сила...

дан двумерный массив размером m*n. Вычислить количество нулевых элементов в каждой строке и результаты записать в массив размера M.
дан двумерный массив размером m*n. Вычислить количество нулевых элементов в...

Записать все елементы массива А в массив В, которые не повторяються
Привет всем) Помогите решить. Есть одномерный массив А, n-елементов....

2
Inadequate
Retired
7710 / 2543 / 670
Регистрация: 17.10.2009
Сообщений: 5,100
05.01.2010, 23:54 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
var
  n,b,s:array[1..1000]of char;
  nmax,bmax,smax,i:integer;
  s:string;
...
  nmax:=0;
  bmax:=0;
  smax:=0;
  for i:=1 to Length(s) do
    if s[i] in ['0'..'9'] then
    begin
      inc(nmax);
      n[nmax]:=s[i]
    end
    else 
      if s[i] in ['a'..'z','A'..'Z','а'..'я','А'..'Я'] then
      begin
        inc(bmax);
        b[bmax]:=s[i]
      end
      else 
      begin
        inc(smax);
        s[smax]:=s[i]
      end;
...
0
Стефани5
0 / 0 / 0
Регистрация: 02.01.2010
Сообщений: 2
05.01.2010, 23:55 3
спасибо большое ты так меня выручил)))))))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.01.2010, 23:55

Записать все слова строки (вместе со знаками препинания) в массив строк
Записать все слова строки (вместе со знаками препинания) в массив строк {...

Записать в массив У сначала все элементы с чётными, а затем с нечётными индексами
Исходный массив вещественого типа ,Записать в массив У сначала все элементы с...

Найти max и min элементы массива y и сформировать массив z из элементов массива y, находящихся между max и min y. Записать массив z в обратном порядке
Дан массив Х{80 элементов}. Вычислить ...


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

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

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