Программа Паскаль абс. Дано значение угла. Угл смежный. Составить алгоритм нахождения 2-го угла

var    a, b: integer; begin    readln(a);    b := 180 - a;    writeln('Смежный угол равен: ', b); end.