проверь, не застрял ли кардридж печати.
попробуй поменять режим печати на черно-белый или на цветной
самый очевидный, перезапустить принтер (хотя наверно попробывал думаю)
возможно дело в драйвере к принтеру, попробуй установить другой версии.
обычно кстати к принтерам делают софт с которого проще машиной, поищи мб есть.
если ранее небыло такой проблеммы при постоянном использовании, то перезапуск обычно решает проблемму.
еще как вариант( если печатаешь с пк а не на прямую), подключи принтер через другой порт usb
вроде все варианты перебрал, разве что кроме очевидной поломки внутренних частей принтера.а так все
Var a,b,h,l;real; {a- Меньшая сторона основания, b большая сторона основания, h высота, l большая сторона}
begin
read(a,b,l);
h=sqrt(sqr(l) - sqr(b-a));{При усоловии что b это большая сторона, находим высоту}
S:=((a+b)*h)/2; {Находим площадь трапеции}
writeln(S:3:0); {Выводим результат (S:3:0 <- 3 сколько знаков до запятой, 0 сколько после)}
end.