eu am scris in C, daca iti trebuie in Pascal pune in loc de printf-writeln, si in loc de scanf-readln.
#include <stdio.h>
main(){
int a,b;
printf("dati valoarea lui a = ");
scanf("%d",&a);
printf("dati valoarea lui b = ");
scanf("%d",&b);
printf("media aritm = %d",(a+b)/2);
}