Порядковый номер дня високосного года

@shadowburn · Регистрация: 30.10.2008

Студворк — интернет-сервис помощи студентам

помогите с задачей господа

"Даны следущие описания :
var k:1...366;d:1...31;m:month;
y:1901...2000; y1:1901...2001;
Опрередлить k - порядковый номер того дня високосного года,
который имеет дату d,m"

использовать процедуры с параметрами и перечисл. тип
я вот начал-
program oO;
uses crt;
type month (jaunuar,februar,mart,april,may,june,jul e,august,september,october,november,dece mber);
var k:1...366;d:1...31;m:month;
y:1901...2000; y1:1901...2001;

вот и все что я смог) кто может и умеет помогите)

Добавлено через 41 минуту 59 секунд
ап

@Puporev · 10.12.2008, 15:26

y:1901...2000; y1:1901...2001;

А это для чего 2 раза?

@shadowburn · 10.12.2008, 19:54 **[ТС]**

Сообщение от Puporev

А это для чего 2 раза?

можно без 2го обойтись
просто y:1901...2000;
думаю 2ое не важно

Добавлено через 52 минуты 8 секунд
ап

Добавлено через 1 час 10 минут 10 секунд
ап

Добавлено через 39 минут 4 секунды
ап

Добавлено через 30 минут 38 секунд
"Даны следущие описания :
var k:1...366;d:1...31;m:month;
y:1901...2000;
Опрередлить k - порядковый номер того дня високосного года,
который имеет дату d,m"
так вот

Добавлено через 1 минуту 4 секунды
"Даны следущие описания :
var k:1...366;d:1...31;m:month;
y:1901...2000;
Опрередлить k - порядковый номер того дня високосного года,
который имеет дату d,m"
так вот

Добавлено через 1 час 13 минут 6 секунд
ап

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .

@shadowburn 0 / 0 / 1 Регистрация: 30.10.2008 Сообщений: 29

	Порядковый номер дня високосного года 10.12.2008, 15:23. Показов 2867. Ответов 2 Метки нет (Все метки) помогите с задачей господа "Даны следущие описания : var k:1...366;d:1...31;m:month; y:1901...2000; y1:1901...2001; Опрередлить k - порядковый номер того дня високосного года, который имеет дату d,m" использовать процедуры с параметрами и перечисл. тип я вот начал- program oO; uses crt; type month (jaunuar,februar,mart,april,may,june,jul e,august,september,october,november,dece mber); var k:1...366;d:1...31;m:month; y:1901...2000; y1:1901...2001; вот и все что я смог) кто может и умеет помогите) Добавлено через 41 минуту 59 секунд ап 0