PascalABC.NET
begin
var (week, month, year) := ReadInteger3('input Week, month, year:');
print(week * 7 + month * 30 + year * 360, 'Дней');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
PascalABC.NET
begin
var (week, month, year) := ReadInteger3('input Week, month, year:');
print(week * 7 + month * 30 + year * 360, 'Дней');
end.