program zadacha1;
var
d1,d2,d3:real; {dejstvitelnie, 3 stuki}
i1,i2,i3:integer;{celie, 3 shtuki}
const e=2.71; {Pervaya postojannaya}
      g=9.8;    {Vtoraya postoyannaya}
      gravity=6.61; {Tretjya postoyannaya}
var c1,c2:integer; {dve celie, chislovie}
    key:char; {odna simvolnaya}
begin
{zdes' teper' mozhno pisat' programmu}
end.