Ответ смотри во вложении:
===== PascalABC.NET =====
begin
ReadSeqIntegerWhile(p -> p <> 0).Average.Println
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ смотри во вложении:
===== PascalABC.NET =====
begin
ReadSeqIntegerWhile(p -> p <> 0).Average.Println
end.