Ejemplo de código
El siguiente fragmento de código muestra un cuadro de mensaje, en una ventana, que dice "Hola mundo!":
Private Sub Form_Load() ' Ejecuta un simple box de mensaje que dice "Hola mundo!" MsgBox ("Hola mundo!") End Sub
Private Sub Form_Load() ' Ejecuta un simple box de mensaje que dice "Hola mundo!" MsgBox ("Hola mundo!") End Sub
/* Esta cabecera permite usar los objetos que encapsulan los descriptores stdout y stdin: cout(<<) y cin(>>)*/ #include <iostream> using namespace std; int main() { cout << "Hola mundo" << endl; return 0; }
program raiz(input, output); uses wincrt; (*Obtener la raíz cuadrada de un número real x cualquiera.*) var x, y: real; respuesta: string; begin writeln('** Calcular la raíz cuadrada de 12 **'); writeln('Entrar x (> 0): '); readln(x); y := sqrt(abs(x)); (* Raíz cuadrada del valor absoluto de x para evitar raíces imaginarias *) writeln; if (x<0) then (* Si x es negativo, el resultado se notifica como imaginario *) writeln('La raíz cuadrada de ', x, ' es el número imaginario ', y,'i') else writeln('La raíz cuadrada de ', x:1:2, ' es ', y:1:2); writeln; writeln('** Fin **'); end
IDENTIFICATION DIVISION.
PROGRAM-ID. HOLAMUNDO.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
PROCEDURE DIVISION.
DISPLAY 'Hola mundo'.
STOP RUN.
1 0 1 0 0 1 1 0 1 0 | - | - - | | - | - x o x o o x x o x o y n y n n y y n y n