Уважаемый Просто!
Во-первых, как модератор, прошу подобные запросы размещать в подразделах "Delphi, Kylix and Pascal" или "Помощь студентам" (в последнем случае - с обязательным указанием языка программирования), а не в общем разделе. Но это так, мелочь.
Во-вторых (и в главных), - как, позвольте поинтересоваться, Вы мыслите дальнейшее существование в статусе студента? Вам дали элементарнейшее школьное задание с тем, чтобы Вы разобрались с самыми-самыми основами основ программирования - циклами, а Вы начинаете шариться с этой ерундой по форумам, дескать, вы напишите, я тупо, бездумно скатаю и сдам. Так? Хорошо, потратим мы три минуты, напишем - а дальше что? А дальше задания начнут усложняться, и уже форумные программисты попросту не захотят тратить своё время на них, а у Вас приблизится сессия, а знаний - по нулям и разбираться уже времени нет, и пойдут вопли-сопли "спасите-помогите!!!" (знаем, не раз проходили), а в итоге - недопуск и отчисление.
Вам оно надо?
Так что мой Вам совет - кончайте эту форумную активность и беритесь за ум. За собственный. Пока не поздно.
P.S. Естественно, мы всегда готовы оказать
конкретную помощь, ответить на
конкретные вопросы и т.п.
P.P.S. Как модератор, любые попытки коллег оказать "помощь", о которой Вы просите, буду пресекать. Ибо нефиг.