Завдання 1Скласти схему алгоритму і програму для обробки масиву символьних даних. Варіанти індивідуальних завдань вказаних в таблиці 5.1, співпадають з Вашим номером в класному журналі
Завдання 2Скласти схему алгоритму і програму по для обробки масиву символьних даних. Варіанти індивідуальних завдань вказаних в таблиці 5.1, співпадають з Вашим номером в класному журналі

ПРИКЛАД ВИКОНАННЯ ЗАВДАННЯ:
Приклад №1 Задана послідовність символів х1,х2.. З’ясувати чи є серед них пара сусідніх символів А і В.
Program primer ;
Uses CRT;
Var x: string[20]; I,k: integer;
Begin
clrscr;
Writeln (‘ Введіть послідовність:’);
Readln(x);
For I:=1 to n-1 do
If (x[i]=’A’ and x[I+1]=’B’) then k:=k+1;
If k<>0 tehn Writeln (‘ Сусідні A,B є у послідовності’) else writeln (‘Сусідніх A,B немає’);
C:=readkey;
End.
Приклад №2 В заданій послідовності символів, до першої точки видалити усі цифри та подвоїти знаки + та *
Program primer2;
Var I: integer; s:string;
Begin clrscr;
Writeln (‘Введіть послідовність:’);
Read(s);
Repeat
If (s[i]=’+’ or s[i]=’*’ then insert(s,s[i],i)
else
if (s[i]<’0’ or (s[i]>’9’) then delete(s,I,1);
Until s[i]=’.’;
End.