请用PASCAL语言解决下面问题

来源：百度知道 编辑：UC知道 时间：2024/05/21 16:21:29
假设中山市现在环境污染相当厉害,蚊子成灾,为了更有效的扑灭这些蚊子,环保局决定做一个调查,了解一下中山现在大蚊子有多少只,小蚊子有多少只,但环保局派去做调查的工作人员工作不负责,他只了解到现在中山一共有z只蚊子,且全市的大蚊子数是实验小学蚊子数的x倍少23只,小蚊子数是实验小学蚊子数的y倍多11只.现在请你帮忙算一算全市大,小蚊子各有多少只?游戏的开启密码就是大蚊子数连小蚊子数。(注意:z,x,y均为已知量且都是整数，1<z<60000)

请把程序打在回答上谢谢!

program wen;
var
a,s,x,y,z:longint;
begin
read(x,y,z);
for a:=1 to z do;
if a*(x+y)-12=z then write(a*x-23,a*y+11:15);
end.

........
实在是太难...
找不到答案.......
悲惨世界咯......
就是实验小学的蚊子数是问题....