lunes, 22 de febrero de 2010

ESTRUCTURA DE CONTROL

CODIGO EN PASCAL
progrm (mayoria edad);
uses
crt;
var
usuario:string;
edad:integer;
const
a=18;
begin
writeln('cual es tu nombre')
readln(usuario);
writeln('cuantos años tienes');
readln(edad);
lf(edad>=18)then
writeln(usuario,'eres mayor de edad');
Else
writeln(usuario,'no eres mayor de edad');
readin;
end.

No hay comentarios:

Publicar un comentario