Question

Как вывести жёлтый квадрат в паскале???срочно!!!!​

Answer 1

Ответ:

uses graphABC;

begin

SetWindowWidth(400);

SetWindowHeight(400);

SetBrushColor(clYellow);

FillRectangle(100, 100, 300, 300)

end.

Объяснение:

картинка

Answer 2

Чтобы вывести жёлтый квадрат в Pascal, вы можете использовать текстовый режим консоли, где каждый символ может быть представлен определенным цветом. Однако, стоит отметить, что Pascal не поддерживает цветовые выводы напрямую. Вам потребуется использовать внешние библиотеки или системные вызовы для изменения цвета текста.

В общем случае, вывод символа в консоли в Pascal выглядит следующим образом:

write('X');

Здесь 'X' - это символ, который вы хотите вывести.

Для вывода квадрата, вы можете использовать два вложенных цикла `for`. Внешний цикл будет контролировать количество строк, а внутренний - количество символов в каждой строке. Вот пример кода, который выводит квадрат из символов 'X':

var
 i, j: integer;
begin
 for i := 1 to 10 do
 begin
   for j := 1 to 10 do
   begin
     write('X');
   end;
   writeln;
 end;
end.

В этом примере, квадрат будет состоять из 10 строк и 10 символов в каждой строке.

Чтобы изменить цвет вывода на жёлтый, вам потребуется использовать системные вызовы или внешние библиотеки. Например, в Windows вы можете использовать функцию `SetConsoleTextAttribute` из `windows.pas` для изменения цвета текста в консоли. Вот пример кода, который выводит жёлтый квадрат:

uses crt, windows;

var
 i, j: integer;
begin
 SetConsoleTextAttribute(GetStdHandle(STD_OUTPUT_HANDLE), 14);
 for i := 1 to 10 do
 begin
   for j := 1 to 10 do
   begin
     write('X');
   end;
   writeln;
 end;
 SetConsoleTextAttribute(GetStdHandle(STD_OUTPUT_HANDLE), 7);
end.

В этом примере, `14` - это код цвета для жёлтого текста, а `7` - для возврата к стандартному цвету текста (белый).

Обратите внимание, что этот код будет работать только в Windows и только если у вас есть доступ к `windows.pas`. В других операционных системах или без доступа к `windows.pas` вам потребуется другой способ изменения цвета текста в консоли.

Источники: - - -