Написать программу в паскале
С клавиатуры вводятся два угла треугольника А, В. Программа выводит, будет ли
он равнобедренным. (Подсказка: не забудьте учесть третий угол).
Предусмотреть в программе, что пользователь может ввести отрицательное число
или число >= 180 или сумма введенных углов >=180, в этом случае должно выдаваться
сообщение об ошибке.
Например: вводим 60 и 20, программа выводит «неравнобедренный треугольник»
вводим 60 и 60, программа выводит «равнобедренный треугольник»
вводим 40 и 100, программа выводит «равнобедренный треугольник»
вводим 200 и 50, программа выводит «Ошибка ввода»

Форматирование абзацев

Форматирование часто применяется по отношению к абзацу.

Абзац — фрагмент текста, процесс ввода которого закончился нажатием на клавишу ввода Enter. Абзац является ключевым элементом в структуре документа для многих текстовых процессоров (хотя имеются и другие, например, в Microsoft Word — разделы).

Операции форматирования абзацев включают установку границ абзацев и абзацных отступов, выравнивание, а также включение переноса слов.

Установку границ абзацев производят с маркеров отступов, находящихся на координатной линейке, или соответствующими командами меню.

Выравнивание (выключка). Различают четыре вида горизонтального (влево, вправо, по центру, по ширине) и три вида вертикального выравнивания (вверх, вниз, по высоте).

Перенос. При выключенном режиме автоматического переноса слово, не поместившееся на строке, полностью переносится на следующую строку. Это не придаст элегантности тексту; его правый край остается неровным. Для улучшения внешнего вида текста используют режим переноса. При ручном варианте переноса пользователь сам определяет место переноса, вводя дефис, и жестким переводом каретки (нажатием на клавишу Enter) переходит на следующую строку. Использование такого режима переноса приводит к необходимости удаления дефисов при повторном форматировании текста документа.

При включенном режиме автоматического переноса реализуется мягкий вариант переноса: текстовый процессор сам делит слово на слот и переносит его наилучшим Этот режим не создает никаких трудностей при повторном форматировании.

Никогда не писала что-либо с использованием графики, но, скорее всего, программа выглядит следующим образом:

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.