Найти фразеологизм про древнегреческого бога, описать его значение и как он появился. ​

Program ab; var  a, b, c, d, s: integer; begin   c : = 6;   readln(a, b);   s : = 6 * a * b;   d : = s div c;   write(d); end.

Var a,b,c,d,pr1,pr2: longint; begin read(a,b,c); pr1: =a*b; pr2: =pr1*6; d: =pr2/6; write(d); end.