C начала 1990 года по некоторый день прошло n месяцев и 2 дня. Определить назван...

July 2022 1 5 Report

C начала 1990 года по некоторый день прошло n месяцев и 2 дня. Определить название месяца этого дня, написать программу в pascal (case of) и (if else), подскажите хотя бы алгоритм решения!

Answers & Comments

HRAshton Var
A: System.DateTime;
i: byte;

begin
readln(i);
A := (new System.DateTime(1990, 1, 1)).AddMonths(i).AddDays(2);
case A.DayOfWeek of
System.DayOfWeek.Monday: writeln('ПН');
System.DayOfWeek.Tuesday: writeln('ВТ');
System.DayOfWeek.Wednesday: writeln('СР');
System.DayOfWeek.Thursday: writeln('Чт');
System.DayOfWeek.Friday: writeln('ПТ');
System.DayOfWeek.Saturday: writeln('СБ');
System.DayOfWeek.Sunday: writeln('ВС');
end;
end.

5 votes Thanks 1

Answers & Comments

vopros po predelam esli v itoge poluchilos beskonechnost na otricatelnoe chislo

pomogite pozhalujsta reshit neravenstvo s obyasneniem

sravnitelnyj oborot schitaetsya tropom ili sintakticheskim sredstvom

anton sel ves stol eto preuvelichenie metonimiya ili sinekdoha i esli mozhn

reshite pozhalujsta cherez metod racionalizacii

po istechenii sroka v znachenii posle pochemu v dannom primere pishetsya i

dan mnogochlenpomogite zhelatelno s resheniem i obyasneniem

razlozhite mnogochlen na mnozhiteli s resheniem

obyasnite pozhalujsta kak reshat takie zadachif2a73ba08b5ecc3dfc0ce568ad722a02 23779

4 zasunuli pod koren obyasnite pozhalujsta

рекомендуемые вопросы

Helpful Links

Helpful Social