Завдання 5. stem-центручні вашої школи вирішили облаштувати stem-центр і представити свою ідею адміністрації табатьківському комітету школи. вони запропонували вам долучитися до проекту. ви вирішили по-яснити, що означають літери s, t, е, му його назві, та як організовані такі центри в україні тасвіті. для такого центру ви плануєте розробити сайт, розмістити на ньому логотип stem-центру,тому вам слід розробити карту структури сайта, а для організації зворотного зв'язку із центром,попереднього запису на заняття ви також маєте розробити форму реєстрації. для придбанняобладнання для центру ви створюєте кошторис, розрахунки для якого будете здійснювати у про-екті, написаному мовою програмування.1. оберіть форму подання своєї ідеї, що дасть змогу продемонструвати всі знайдені відомостіта напрацьовані матеріали, створіть представлення ідеї у вибраному середовищі. органі-зуйте б розміщення матеріалів, який буде доступний учням класу.2. заповніть таблицю виконання завдання — файл таблиця-stem, збережений у папці комле-тентнісні завдання.3. надайте доступ до матеріалів учителю.іть будь ласка​

Var
   Text,S:string;
   n,k:boolean;
   i:integer;
Begin
Write('Введите текст на русском языке: ');ReadLn(Text);
Text:=LowerCase(Text)+' '; // перевоит текст в нижний регистр
WriteLn(Text); // показывает действие предыдущей строки
For i:= 1 to Length(Text) do
    Begin
    if ('а' <= Text[i])and(Text[i] <= 'я')or(Text[i] = 'ё') then S:=S+Text[i] // записываем русские буквы в S
    else // как только встречаем другой символ, проверяем,
       if Length(S) > 0 then // есть ли в S хоть одна буква,
          Begin // и если есть, то проверяем условие задачки, и выводим слово на экран, если оно истинно
          if (S[1] in 'бвгджзйклмнпрстфхцчшщ')and(S[Length(S)] in 'аоэиуыеёюя') then WriteLn(S);
          S:=''; // далее обнуляем S
          End;
    End;
End.

Пример работы программы:

Введите текст на русском языке: Дан произвольный текст на русском языке. Написать программу, которая выводит слова, начинающиеся на согласную и заканчивающиеся гласной буквой.
дан произвольный текст на русском языке. написать программу, которая выводит слова, начинающиеся на согласную и заканчивающиеся гласной буквой.
на
программу
которая
слова
начинающиеся
на
согласную
заканчивающиеся

Алгоритм оказания первой что при оказании первой вам ничего не угрожает и вы не подвергаете себя опасности.Обеспечить безопасность пострадавшему и окружающим (например, извлечь пострадавшего из горящего автомобиля).Проверить наличие у пострадавшего признаков жизни (пульс, дыхание, реакция зрачков на свет) и сознания. Для проверки дыхания необходимо запрокинуть голову пострадавшего, наклониться к его рту и носу и попытаться услышать или почувствовать дыхание. Для обнаружения пульса необходимо приложить подушечки пальцев к сонной артерии пострадавшего. Для оценки сознания необходимо (по возможности) взять пострадавшего за плечи, аккуратно встряхнуть и задать какой-либо вопрос.