Составьте программу нахождения суммы всех натуральных - вопрос №13493438 от muradyanarutyun 14.01.2020 12:19

Question

Информатика: Составьте программу нахождения суммы всех натуральных чисел из диапазона от А до Б, включая А и В, кратных 5 и 13 (А и В вводятся с клавиатуры).

muradyanarutyun · Answer

PascalABC.NETbegin var (a,b) := ReadInteger2( Введите A и B: ); (A..B).Sum(x- (x.is mod 5=0) or (x mod 13=0)?x:0).Printend.Пример работы:5 + 10 + 13 = 28...