Паскаль тема строки 1)с клавиатуры вводится строка, состоящая из трёх слов. слова отделяются друг от друга ровно одним пробелом. поменять местами 2 и 3 слова. 2)с клавиатуры вводится строка, в которой есть одна открывающая и одна закрывающая круглые скобки. вывести на экран символы, заключённые между этими двумя скобками.3)с клавиатуры вводится строка. заменить в ней все пробелы на восклицательные знаки.

1) var s123,s2,s3,s132: string; i: integer; begin writeln('введите строку'); readln(s123); i: =1; while s123[i]< > ' ' do     i: =i+1; i: =i+1; s2: =''; while s123[i]< > ' ' do     begin     s2: =s2+s123[i];     i: =i+1     end; i: =i+1; s3: =''; while i< =length(s123) do     begin     s3: =s3+s123[i];     i: =i+1     end; s132: =''; i: =1; while s123[i]< > ' ' do     begin     s132: =s132+s123[i];     i: =i+1;     end; s132: =s132+' '; i: =1; while i< =length(s3) do     begin     s132: =s132+s3[i];     i: =i+1;     end; s132: =s132+' '; i: =1; while i< =length(s2) do     begin     s132: =s132+s2[i];     i: =i+1;     end; writeln(s132) end. пример: введите строку 123 456 789 123 789 456 2) var s: string; i: integer; begin write('введите строку: '); readln(s); i: =1; while s[i]< > '(' do i: =i+1; i: =i+1; while s[i]< > ')' do     begin     write(s[i]);     i: =i+1     end; end. пример: введите строку: 6543654(000)65431 000 3) var s: string; i: integer; begin write('введите строку: '); readln(s); for i: = 1 to length(s) do       if s[i] = ' ' then s[i]: ='! '; writeln(s) end. пример: введите строку: с клавиатуры вводится строка. заменить в ней все пробелы на восклицательные знаки. с! клавиатуры! вводится! строка.! заменить! в! ней! все! пробелы! на! восклицательные! знаки.!

Объект – это часть окружающей действительности, воспринимаемая человеком как единое целое. каждый объект имеет имя, признак, свойства, действия, поведение, состояние, может общаться и  может иметь свой состав.  любой реальный объект бесконечно сложен, поэтому его можно рассматривать как систему. система – это целое, состоящее из частей, связанных между собой.