вот держи это часть кода из программы.если не можешь начало и конец написать то напиши в комменты я подскажу
a: =n giv 1000; //находится 1 число
b: =n div 100 mod 10; //2 число
c: =n div 10 mod 10; //3
d: =n mod 10; // 4
s1: =a+b;
//ищется сумма первых двух
s2: =c*d; //ищется произведение двух последних цифр
если что после // - идёт подсказка
вот и всё < 3