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