Units q no compilan
Publicado por Milton (14 intervenciones) el 16/11/2002 18:56:05
Por favor necesito q alguien me diga lo antes posible xq no me compila esta unit(me dice "illegal unit name"):
unit semi-sumador;
interface
uses crt;
procedure semisumador(a,b: boolean; var acarreo: boolean;var suma: boolean);
implementation
procedure semisumador(a,b: boolean; var acarreo: boolean;var suma: boolean);
var s : boolean;
begin
s := a or b;
acarreo := a and b;
suma := s and (not acarreo);
end;
end.
unit semi-sumador;
interface
uses crt;
procedure semisumador(a,b: boolean; var acarreo: boolean;var suma: boolean);
implementation
procedure semisumador(a,b: boolean; var acarreo: boolean;var suma: boolean);
var s : boolean;
begin
s := a or b;
acarreo := a and b;
suma := s and (not acarreo);
end;
end.
Valora esta pregunta


0