А) var s:string; mas:array ['a'..'z'] of longint;{индексы элементов соответствуют латинице} c:char; i:longint; begin read(s); for c:='a' to 'z' do{заполнение нулями элементов массива, для запоминания количества элементов в латинице} mas[c]:=0; for i:=1 to ord(s[0]) do{пробегаем по всей строке ord(s[0]) это количесвто элементов в строке (только паскаль)} mas[s[i]]:=mas[s[i]]+1; for c:='a' to 'z' do{пробегаем по массиву значений и выводим только неповторяющиеся} if(mas[c]=1) then writeln(c); end.
А) последствия событий 13 века: события этого века положили начало отстаиванию земель от стран 'западной европы; золотоордын-ское иго нанесло огромный ущерб . политическому и культурному развитию руси б) океан - главный хранитель воды, давно поражающий исследователей необычностью своих свойств. воды пронизывают всю оболочку и производил в ней разнообразную работу в) симбиоз - это взаимовыгодное отношение двух организмов. плоские черви - паразиты г) всякий равносторонний треугольник есть равноугольный треугольник. прямоугольник с равными сторонами есть квадрат д) язык - один из славянских языков. пунктуация изучат знаки препинания е) пушкин - великий поэт. достоевский - один из популярных писателей ж) информатика зиждется на . компьютер облегчил жизнь человека