CanonSharp/OpenSet/71_multiple_returns.pas
jackfiled 89ce313b77 feat: CanonSharp Benchmark. (#4)
Reviewed-on: https://git.bupt-hpc.cn/jackfiled/CanonSharp/pulls/4
Co-authored-by: jackfiled <xcrenchangjun@outlook.com>
Co-committed-by: jackfiled <xcrenchangjun@outlook.com>
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.