⦁ Создайте программу, чтобы проверить, кипит ли вода или нет.Составьте программу на языке программирования python

Так как в задании не указано, что введенное слово должно обрамляться пробелами, то код может быть такой:

var s,a:string;
    begin
    write('Введите строку : ');
    readln(s);
    write('Введите слово : ');
    readln(a);
       if(pos(a, s) <> 0) then writeln('Слово "',a,'" в строке есть')
       else writeln('В строке такого слова нет');
    end.

Тест №1
Введите строку : Привет участникам олимпиады!
Введите слово : ник
Слово "ник" в строке есть

Тест №2
Введите строку : Всем привет!
Введите слово : админ
В строке такого слова нет

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!

№1

begin
  var n:=15;
  var a:=ArrRandom(n,2,5); a.Println;
  var k2:=a.Where(t->t=2).Count;
  Writeln('Не сдали экзамен ',k2,' чел, что составляет ',k2/n*100:0:1,'%')
end.

Пример
4 3 3 4 5 4 3 4 3 5 4 5 2 5 2
Не сдали экзамен 2 чел, что составляет 13.3%

№2

begin
  ArrRandom(7,15,40).Println.OrderBy(t->t).Println
end.

Пример
34 21 24 29 28 22 25
21 22 24 25 28 29 34

P.S. А объяснять тут нечего - все видно из текста программы.