Написать программу на Pascal abc в которой разными цветами в центре и по углам экрана будет выводиться имя "Сергей" и проверить работоспособность на компьютере( то есть проверить будет ли работать программа)

Написать программу на Pascal abc в которой разными цветами в центре и по углам экрана будет выводиться имя "Сергей" и проверить работоспособность на компьютере( то есть проверить будет ли работать программа)
Гость
Ответ(ы) на вопрос:
Гость
Никогда не писала что-либо с использованием графики, но, скорее всего, программа выглядит следующим образом: uses  GraphABC; var  x0, y0, x1, y1: integer; begin       SetWindowSize(400, 400);//устанавливаем размер окна     x0 := WindowWidth;//ширина окна     y0 := WindowHeight;//высота окна       SetFontColor(clRed);//Устанавливаем цвет текста     TextOut(0, 0, 'Сергей');//Надпись в левом верхнем углу         x1 := WindowWidth div 2; //половина ширины окна     y1 := WindowHeight div 2;//половина высоты окна      SetFontColor(clBlue);    TextOut(x1, y1, 'Сергей');//Надпись посередине      SetFontColor(clYellow);    TextOut(0, y0, 'Сергей');//Надпись в левом нижнем углу     SetFontColor(clPurple);    TextOut(x0, 0, 'Сергей');//Надпись в правом верхнем углу      SetFontColor(clGreen);    TextOut(x0, y0, 'Сергей');//надпись в правом нижнем углу end. Программа была написана  в Pascal ABC.NET. Пожалуйста, проверьте, работает ли она в вашем Pascal.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы