Respostas

2014-07-05T21:08:10-03:00
Program area_retangulo;
var base, altura : integer;
begin
    write('Digite o valor da base : ');
    readln(base);
    write('Digite o valor da altura : ');
    readln(altura);
    writeln('Area = ', base*altura);
    readln();
end.