Предмет: Информатика, автор: GGWPGGWP228

Вывести все натуральные числа от 20 до 50 кратные 3 и не кратные 5 ( на паскале)

Ответы

Автор ответа: Аноним
2

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 Range(20, 50).Where(t -> (t mod 3 = 0) and (t mod 5 <> 0)).Println

end.


21 24 27 33 36 39 42 48


GGWPGGWP228: можно подробнее? и что такое range
Аноним: Загружаете программу, наводите курсор на непонятное место и получаете п\внятную подсказку на русском языке.
Аноним: Range - итератор, создающий последовательность целых чисел от 20 до 50 включительно.
Аноним: Каждый элемент этой последовательности проходит фильтр Where, пропускающий только те элементы, которые удовлетворяют условию. Что прошло - выводится.
GGWPGGWP228: Спасибо)
Аноним: Пожалуйста
Похожие вопросы
Предмет: Алгебра, автор: kpeshehonova2001