begin write('Введите a: '); readln(a); write('Введите b: '); readln(b); var x := Range(a, b); var y:=(x.Where(x -> (x>=10) and (x<=99))); writeln('Двузначные числа от A до B: '); y.Println; writeln('Двузначные числа, которые делятся на 15: '); y.Where(x -> (x mod 15)=0).Println; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку