Files
CanonSharp/OpenSet/71_multiple_returns.pas
2024-08-19 14:37:34 +08:00

14 lines
162 B
ObjectPascal

program main;
const
AA = 4;
var
a, b, c, d: integer;
begin
b := 8;
c := 12;
a := b + c;
d := 9;
a := (AA - b) * c;
write(a);
end.