program suma; uses crt;
var x,s:integer;
begin
clrscr;
x:=1;
s:=0;
repeat
s:=s+x;
x:=x+1;
until x=50;
writeln('la suma es ',s);
readln;
end.
(Visual Basic Advanced)
Sub LoopTableExample
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT * FROM tblMain")
Do Until rs.EOF
MsgBox rs!FieldName
rs.MoveNext
Loop
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing
End Sub
(C ++)
#include
// Esta librería permite el uso de cout(<<) y de cin(>>) using namespace std; int main(){
cout
<< "¡Hola mundo!"
<< endl;
}
(Java)
// Hola.javapublic
class Hola {
public static void main(String[] args) {
System.out.println("Hola, mundo!");
}
}
No hay comentarios:
Publicar un comentario