Регистрация
0000444455665
26.02.2021 07:35
Информатика
Есть ответ 👍

Паскаль у місяці обчислити кількість парних днів

219
386
Посмотреть ответы 2

Ответы на вопрос:

alalosh
alalosh
4,6(82 оценок)
//pascalabc.net 3.1 сборка 1239 uses system; begin       var m : = readinteger('введите номер месяца => ');       var d : = new datetime(datetime.now.year, m, 1);             var k : = 0;       repeat               if d.day mod 2 = 0 then k += 1;               d : = d.adddays(1);       until d.month < > m;             writeln(k); end.
adrian55RUS
adrian55RUS
4,4(85 оценок)

первое,подчёркнутое чёрной линией- гиперссылка. второе,без подчёркивания- ссылка

Популярно: Информатика