даны два числа. Вычислить их сумму. Если она превышает 1000, то вычислить и вывести квадрат. первого числа, иначе-вычислить и вывести куб второго числа

var a,b:integer;beginreadln(a,b);if((a+b)>1000) then writeln(a*a, ' - квадрат первого числа')elsewriteln(b*b, ' - куб второго числа');end.