Question

Расстояние между словами должно быть 50 пикселей. (создать программу на Паскаль)

Answer 1

Чтобы между словами было 50 пикселей, воспользуемся командой TextOut(), которая выводит текст в прямоугольнике с заданной координатой левого верхнего угла. Переменная m будет являться верхним отступом для каждого слова. В каждой итерации цикла мы увеличиваем переменную m на 50 (пикселей).
uses GraphABC;
const sl = 'Программирование';
var n, m: integer;
begin
 m := 0;
 writeln ('Введи n ');
 read(n); writeln (n);
 for var i := 1 to n do
 begin
  SetFontColor(rgb(random(255), random(255), random(255)));
  m := m + 50;
  TextOut(0, m, sl);
 end
end.