Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.12.2012, 23:52   #1
makskovalko
Пользователь
 
Аватар для makskovalko
 
Регистрация: 23.04.2012
Сообщений: 82
По умолчанию Интересная задача

Помогите, пожалуйста, решить задачу.


В первом полугодии учебного года занятия проходят с 1 по 8 и 10 по 17 недели (9 неделя - каникулы). Расписанием одного с классов 5 дней на неделю (с понедельника по пятницу) проходят по 6 уроков каждодневно (всего 480 уроков за полугодие). Все эти уроки пронумерованы.

Написать программу, которая определяет, на какой неделе и в какой день проходит урок из заданным номером N.

Ввод: Вводится натуральное число N в диапазоне от 1 до 480.
Вывод: Выводятся 2 числа через пробел: номер недели и номер дня в неделе.

Пример:
10 1 2
makskovalko вне форума Ответить с цитированием
Старый 18.12.2012, 23:58   #2
Son Of Pain
Участник клуба
 
Регистрация: 23.12.2010
Сообщений: 1,129
По умолчанию

Так а в чем проблема? Делишь номер урока на количество недель - получаешь номер недели (считая с нулевой). Если номер больше семи - прибавляешь единицу. Остаток делишь на 5 - получаешь номер дня (считая с нуля, опять же).
Son Of Pain вне форума Ответить с цитированием
Старый 19.12.2012, 00:50   #3
makskovalko
Пользователь
 
Аватар для makskovalko
 
Регистрация: 23.04.2012
Сообщений: 82
По умолчанию

Мне нужно полное решение на Паскале.
makskovalko вне форума Ответить с цитированием
Старый 19.12.2012, 09:32   #4
Aranea tela telam
Пользователь
 
Аватар для Aranea tela telam
 
Регистрация: 11.01.2012
Сообщений: 51
По умолчанию

А мне нужно 5 тыс $
Давай поменяемся я тебе задачу а ты мне 5 тыс $
зы Не воспринимать всерьез это шутка!
Я учусь на своих ошибках, но порой их слишком много
Aranea tela telam вне форума Ответить с цитированием
Старый 19.12.2012, 09:49   #5
Aranea tela telam
Пользователь
 
Аватар для Aranea tela telam
 
Регистрация: 11.01.2012
Сообщений: 51
По умолчанию

Забирай
Код:
Program pr1;
var a:array[1..480]of integer;
b,c:integer;
begin
c:=0;
readln(b);
While b>7 do
begin
inc(c);
b:=b-7;
end;
Writeln(c,' ',b);
end.
зы что то спасиба никто не говорит(
Я учусь на своих ошибках, но порой их слишком много
Aranea tela telam вне форума Ответить с цитированием
Старый 19.12.2012, 10:34   #6
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

Цитата:
зы что то спасиба никто не говорит(
5 тыс $ ищут.
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
Sciv вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
интересная задача Erkesh Помощь студентам 1 03.11.2012 16:19
Интересная задача makskovalko Помощь студентам 6 12.08.2012 18:47
Интересная задача rick1177 Microsoft Office Excel 13 18.05.2011 22:00
Интересная задача terminadoor Помощь студентам 1 06.02.2009 20:00
Интересная задача! - DannerDOS.kz Паскаль, Turbo Pascal, PascalABC.NET 2 16.12.2008 14:04