// PascalABC.NET 3.0, сборка 1076
begin
var a:=ArrRandom(100,22,200);
Writeln('Исходный массив:',#13#10,a);
Write('Элементы массива, кратные пяти: ');
a.Where(x->x mod 5 = 0).Println;
end.
<em><u>Тестовое решение:</u></em>
Исходный массив:
[109,130,69,32,86,164,37,55,60,140,25,23,111,23,24,125,23,46,50,30,44,112,92,183,87,51,148,200,56,164,154,177,56,200,130,145,53,196,101,198,162,56,155,30,55,144,40,200,188,182,75,119,25,183,148,198,59,86,145,56,37,38,200,96,187,48,167,112,93,80,94,28,146,52,68,188,158,84,150,144,33,149,33,75,110,57,174,73,73,133,107,167,73,66,183,146,57,80,44,28]
Элементы массива, кратные пяти: 130 55 60 140 25 125 50 30 200 200 130 145 155 30 55 40 200 75 25 145 200 80 150 75 110 80
Предположим, что строку пользователь вводит в консоли
def f(): #объявляем функцию, которая будет искать количество
a = input('Введите строку: ') #Переменная а ссылается на то, что пользователь ввел в консоли
return len(a.split(' ')) #Вызываем метод split(' '), который делает из строки список, где каждый элемент - это слово в строке. Параметром в этом методе является символ, который разделяет слова в строке, в нашем случае - пробел. Уже от этого списка вызываем функцию len, который возвращает длину списка, то есть количество слов
f() #вызываем составленную нами функцию
можно вообще все уместить в одну строку сделав так:
def f():
return len(input('Введите строку: ').split(' ')) #Чтобы не создавать переменную а, мы применили функцию split сразу к input
f()
или обойтись без новой функции
print(len(input('Введите строку: ').split(' '))) #print выводит то, что было передано через параметр на экран