Question

Помогите написать программу в паскале )

Answer 1

Program fgj ;
uses drawman ;
field (10,10);
penup;
topoint (1,3);
pendown;
topoint (3,5);
topoint (3,1);
end.

Answer 2

Конечно, я помогу вам написать программу на языке Паскаль. Для начала давайте решим, что программа будет делать. Например, давайте напишем программу, которая будет запрашивать у пользователя два числа и выводить их сумму. Вот пример программы на Паскале:

pascalCopy code
program SumTwoNumbers;

var
  num1, num2, sum: integer;

begin
  // Выводим приветственное сообщение
  writeln('Привет! Это программа для сложения двух чисел.');

  // Запрашиваем у пользователя первое число
  write('Введите первое число: ');
  readln(num1);

  // Запрашиваем у пользователя второе число
  write('Введите второе число: ');
  readln(num2);

  // Вычисляем сумму
  sum := num1 + num2;

  // Выводим результат
  writeln('Сумма чисел ', num1, ' и ', num2, ' равна ', sum);

  // Ждем, пока пользователь нажмет Enter, чтобы закрыть окно программы
  writeln('Нажмите Enter, чтобы закрыть программу.');
  readln;
end.

Вы можете скопировать этот код и вставить его в среду разработки Паскаля (например, Lazarus или Free Pascal) для компиляции и выполнения программы.

Если у вас есть конкретные требования к программе или другая задача, пожалуйста, сообщите мне, и я с радостью помогу вам написать код для неё.