от которые есть умоляю информатика решите

n = int(input())

for i in range(0, n):

   k = int(input())

m = 0

n = int(input())

for i in range(0, n):

   k = int(input())

m = 0

n = int(input())

for i in range(0, n):

   k = int(input())

   if (k % 5 == 0) and (k > m):

       m = k

m = 0

n = int(input())

for i in range(0, n):

   k = int(input())

   if (k % 5 == 0) and (k > m):

       m = k

print(m)

Объяснение:

Объявим переменную m, где мы будем хранить ответ, равную 0 (так как в задании представлены натуральные числа, а 0 является ближайшим ненатуральным), и запишем ее в начало программы.Теперь можем работать с переменной k. Если остаток от деления на 5 равен 0 (т.е. кратно 5) и значение k больше значения m (т.к. m — наш ответ), то присвоим значение из переменной k переменной m.И в самом конце выводим переменную m — наш ответ.

//PascalABC.Net 3.0, сборка 1064
var
  s,w:string;
begin
  Write('Введите предложение: '); Readln(s);
  Write('Введите искомое слово: '); Readln(w);
  s:=' '+s+' ';
  if Pos(' '+w+' ',s)>0 then Writeln('Слово входит в предложение')
  else Writeln('Слово не входит в предложение')
end.

Тестовые решения:
Введите предложение: А роза упала на лапу Азора
Введите искомое слово: роза
Слово входит в предложение

Введите предложение: Вчера смотрели старую кинопанораму
Введите искомое слово: кино
Слово не входит в предложение

Введите предложение: Интересное было кино или так себе?
Введите искомое слово: кино
Слово входит в предложение

Замечание: В программе было обращено внимание на то, что "слово" не может быть частью другого слова, а должно являться самостоятельным членом предложения. В противном случае принято говорить не о слове, а о  контексте (подстроке)