Помогите написать программу в Pascal

[goldi003]

Помогите написать программу в Pascal

Разработать программу,, которая на вход получает 4 числа (X,Y,K,N);На экран выводится N квадратов с координатами X,X1,Y,Y1 на расстояние между квадратами, K;

 

[Vladimir_S]

Разработать программу,, которая на вход получает 4 числа (X,Y,K,N);На экран выводится N квадратов с координатами X,X1,Y,Y1 на расстояние между квадратами, K;

Уточните:
1. О каком Паскале речь? Объясню: если это Turbo (Free) Pascal с Borland-графикой, то без проблем, а вот если Pascal ABC и его клоны, то — увы, не владею.
2. Что означают переменные X, X1, Y, Y1? Почему X1 и Y1 не задаются? Или они произвольны? И в каких единицах задаются X, Y и K? В пикселах?

 

[AlexZir]

Если нужно выводить квадраты, то со стороной более менее понятно, она вычисляется как Y-X. Тогда X1 и Y1 тоже легко вычислить. Только непонятно, почему в таком порядке координаты для отрисовки прямоугольника задаются, ну да фиг с ним, пусть остается на совести составителя задачи.

Алгоритм решения следующий:
1. Вводим исходные значения
2. Вычисляем длину стороны a:=Y-X
3. Заводим цикл от 1 до N
3.1 Отрисовываем прямоугольник с координатами (X,X+a,Y,X+a)
3.2 Изменяем координаты X:=X+a+K и Y:=Y+a+K

Раз не удосужились указать версию Pascal, то алгоритм портируете сами