constant.pas

来自「This ar the basic programs that i did in」· PAS 代码 · 共 14 行

program constante;
const
     alex=5;
     bogdan=alex+5;
var a:integer;
begin
read(a);
writeln(a);
writeln('alex= ',alex);
writeln('bogdan= ',bogdan);
writeln('MaxInt= ',MaxInt);
writeln('MaxLongInt= ',MaxLongInt);
writeln('Pi= ',Pi);
end.