Паскаль, графика, прямоугольники
Добавлено: 27 апр 2009, 14:11
Здравствуйте)))есть вот такая задача:
Построить на экране квадрат, состоящий из 225 маленьких квадратов(15х15). Заполнить каждый квадрат чистым цветом(от1 до 15). Цвет в каждой следуещей строке сдвинут на 1 квадрат относительно предыдущей( 1-я строка: 1,2,3,...15; 2-я строка: 15,1,2,...14; 3-я строка: 14,15,1,...13 и т.д.)
напишите,пожалуйста, хотя бы алгоритм как заполнять эти квадраты...первую строку легко можно с помощью оператора For to do заполнить...а вот как следующие?если влоб делать, то оч громозко выходит...помогите)
Построить на экране квадрат, состоящий из 225 маленьких квадратов(15х15). Заполнить каждый квадрат чистым цветом(от1 до 15). Цвет в каждой следуещей строке сдвинут на 1 квадрат относительно предыдущей( 1-я строка: 1,2,3,...15; 2-я строка: 15,1,2,...14; 3-я строка: 14,15,1,...13 и т.д.)
напишите,пожалуйста, хотя бы алгоритм как заполнять эти квадраты...первую строку легко можно с помощью оператора For to do заполнить...а вот как следующие?если влоб делать, то оч громозко выходит...помогите)