Решите на пасхале, найти сумму четных целых чисел - вопрос №88045181 от vikaraduga 23.03.2020 17:14

Question

Информатика: Решите на пасхале, найти сумму четных целых чисел на промежутке от 1 до k. формат ввода: на вход подается неотрицательное, целое число k, не превосходящее 30000. формат вывода: целое число. пример входных данных 10 пример выходных данных 30

vikaraduga · Answer

//PascalABC.NET версия 3.3begin  seqgen(readinteger(),x- x+1).Where(x- x mod 2 = 0).Sum.Println;end.Пример работы программы:1656806 ...