Строки как одномерные массивы символов в Паскаль

Решение №7 из главы 16.Проверить можно ли строки из m перестановкой символов получить строку n

Задача №7 из главы 16

Проверить можно ли строки из m перестановкой символов получить строку n.
Примеры (входные данные и ответ):

1
abc и bca

-- можно

1
abc и baa

-- нельзя

1
abcc и cbac

-- можно

1
abc4c и cb55ac

-- нельзя

Решение №5 из главы 16. Выделите из строки массив первых 8 строковых литералов, которые являются числами

Задача №5

Пользователь вводит строку произвольных символов, выделите из неё массив первых 8 строковых литералов, которые являются числами. И выведите эти числа на экран.
Например, из строки:
rew2@#$$#435tr353453t4er4
должны быть выделены подстроки:
2
435
353453
4
4

Решение №4 из главы 16.Запишите первые 8 символов цифр в массив и выведите этот массив на экран

Пользователь вводит строку произвольных символов, запишите первые 8 символов цифр в массив и выведете этот массив на экран.

Задача №4

Решение задачи №3 из главы 16. Посчитать количество цифр в строке

Задача №3

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

program pascal_string3;
var i,amt :integer;
    s : string;
begin
writeln('input  string  : ' );
readln( s );
amt := 0;
for i := 1 to length( s ) do
begin
  if( s[i] >= '0') and ( s[i] <= '9' ) then
    amt+=1;
end;  
writeln( 'amount digits in string : ' , amt ); 
end.

Решение задачи №2 из главы 16.Пользователь вводит произвольную строку, выведите на экран каждый пятый элемент

Задача № 2

Пользователь вводит произвольную строку, выведите на экран каждый пятый символ или сообщение об ошибке, если строка состоит менее чем из 5 символов.

Subscribe to RSS - Строки как одномерные массивы символов в Паскаль