Даны числа a и b вычислить сумму и утроенное произведение (информатика паскаль

Просто попробуй в Pascal ABC проверить что учу я на информатике:

program n1;

uses graphABC;

var x,y: integer;

begin

setpenwidth(3);

line (100,300,300,300);

line(100,300,150,200);

SetPenStyle(psDash);

line(150,200,350,200);

SetPenStyle(psSolid);

line(350,200,300,300);

line(250,50,150,200);

line(250,50,100,300);

line(250,50,350,200);

line(250,50,300,300);

end.