Помогите пожалуйсто буду очень признателен!1.Зад Даны 2 числа отыскать их сумму

Если можно то сможете обьянить где какой процесс происходит и тд

1-zadacha
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('Сумма=',a+b);
Writeln('Произведение=',a*b);
end.

2-zadacha
var a:integer;
writeln('Введите двухзачений число='); Readln(a);
Writeln('Сумма цифр=', (a mod 10)+(a div 10));
end.

3-zadacha
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('сред арифмитическое=',(a+b)/2);
end.