===== PascalABC.NET =====
begin
// 1
var (a,b) := ReadInteger2;
Swap(a,b);
Println(a, b);
// 2
ReadSeqIntegerWhile(p -> p <> 8).Sum.Print
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
// 1
var (a,b) := ReadInteger2;
Swap(a,b);
Println(a, b);
// 2
ReadSeqIntegerWhile(p -> p <> 8).Sum.Print
end.