• Lenguaje

    Pascal

  • Descripción

    Calcule la cantidad de agua (en metros cúbicos) necesaria para llenar una piscina de 50 x 10 x 2 (metros).

1
2
3
4
5
6
7
8
9
10
11
program AguaEnM3;
uses crt;

var m3 : integer;
begin
    m3 := 50*10*2;
    writeln ('Valor de m3: ', m3);
    writeln;
    write ('Presiona una tecla para terminar . . . ');
    readkey;
end.