pascal语言编程题编程:炊事员采购用500元买90只鸡,母鸡一只15元,公鸡10元,小鸡5元,正好钱用完.母鸡、公鸡、小鸡各买几只?(我要程序!)急!

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/09 08:51:09
pascal语言编程题编程:炊事员采购用500元买90只鸡,母鸡一只15元,公鸡10元,小鸡5元,正好钱用完.母鸡、公鸡、小鸡各买几只?(我要程序!)急!
x)+H,NNy~ L{=7u=t⌗/}>e';7X<_rBg{ԓ @)PRi ?[ҽ/'mt]DFzO Yz_g Km,3<_`g3?1L+@NNUf^Ijzj5X?H!@!_XU* *ej"h&!@nn56YO7CSLmC,mSl[`aS!~ E%9yV:Y@me,l @Q T

pascal语言编程题编程:炊事员采购用500元买90只鸡,母鸡一只15元,公鸡10元,小鸡5元,正好钱用完.母鸡、公鸡、小鸡各买几只?(我要程序!)急!
pascal语言编程题
编程:炊事员采购用500元买90只鸡,母鸡一只15元,公鸡10元,小鸡5元,正好钱用完.母鸡、公鸡、小鸡各买几只?(我要程序!)急!

pascal语言编程题编程:炊事员采购用500元买90只鸡,母鸡一只15元,公鸡10元,小鸡5元,正好钱用完.母鸡、公鸡、小鸡各买几只?(我要程序!)急!
VAR
i,j,k:integer;
BEGIN
FOR i:=0 TO 33 DO
FOR j:=0 TO 50 DO
BEGIN
k:=90-i-j;
IF 15*i+10*j+5*k=500
THEN writeln(i:5,j:5,k:5)
END
END.