Напишите программу, которая считывает слово, затем выводит: «[это слово] ? Конечно, помню, ведь мы проходили это на занятии!». Пример

Ввод Вывод

print print ? Конечно, помню, ведь мы проходили это на занятии!

2)Напишите программу, которая считывает с клавиатуры одно за другим два целых числа и выводит их сумму.

Пример 1

Ввод Вывод

3 8

5

Пример 2

Ввод Вывод

34234324 86588760

52354436

Если число кратно 7 и 9 одновременно, то оно кратно и их произведению, т.е. 63.

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

begin
  var (a,b):=ReadInteger2('Введите границы интервала');
  if a>b then Swap(a,b);
  var m:=a mod 63;
  if m>0 then a:=a+63-m
  else if m<0 then a:=a-m;
  var s:=Range(a,b,63);
  Writeln('На интервале для чисел, кратных 7 и 9 одновременно:');
  Writeln('Количество ',s.Count,', сумма ',s.Sum,', произведение ',
      s.Aggregate(BigInteger(1),(p,q)->p*q))
end.

Пример
Введите границы интервала 613 2100
На интервале для чисел, кратных 7 и 9 одновременно:
Количество 24, сумма 32508, произведение 365675480699261550432828460140720056759879856012024400651039614959616000000

s = input("Введите предложение:")

length = int(input("Введите длину слова:"))

index_word = [i for i,x in enumerate(s.split()) if len(x) == length]

max_distance = 0

if index_word :

for i in range(len(index_word)-1):

distance = index_word[i+1] - index_word[i]

if max_distance < distance:

max_distance = distance

print(max_distance-1)

else:

print('нет слов длиной',length)

Объяснение:

S и length думаю понятно...

index_word - создает список из порядковых номеров (-1) слов, длина которых равняется length

Два условия, если index_word не пустой и если он пустой.

Если он не пустой, то:

1) i = индекс каждого номера в списке index_word ( - 1, чтобы не было ошибки list out of range)

2) dinstance = отнимаем последующий номер от предыдущего

3) Если ответ (max_distance) < distance мы приравниваем его к ответу.

4) После окончания цикла выводим ответ (max_distance - 1), то есть расстояние

Если пустой:

Нет слов с длиной length