Código :
program calculadora_decimo_terceiro_salario;
 
uses crt;
var n1,n2,resultado:real;
 
BEGIN
    clrscr;
    Writeln('Digite o seu salário:');
    readln(n1);
    Writeln('Digite a quantidade de meses em que trabalhou:');
    readln(n2);
    resultado:=(n1*n2)/12;
    writeln(resultado:0:0);
    readkey;
 
 
END.