H:[枚举][二元一次方程组]牛吃草 pascal程序
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/08/28 08:04:27
H:[枚举][二元一次方程组]牛吃草 pascal程序
H:[枚举][二元一次方程组]牛吃草
时间限制:1 Sec 内存限制:128 MB
提交:24 解决:15
[提交][状态][讨论版]
有一块牧场,12头牛28天可以吃完10亩草地上全部的牧草,21头牛63天可以吃完30亩草地上全部的牧草.多少头牛n天可以吃完m亩草地上全部的牧草,假设每亩草地原有的草数量相等,每天草地上的草都是匀速生长的.
输入
输入数据仅有一行包含两个用空格隔开的整数n和m.n和m都是不超过10000的正整数.
输出
输出一个整数.
样例输入
126 72
样例输出
36
提示
H:[枚举][二元一次方程组]牛吃草
时间限制:1 Sec 内存限制:128 MB
提交:24 解决:15
[提交][状态][讨论版]
有一块牧场,12头牛28天可以吃完10亩草地上全部的牧草,21头牛63天可以吃完30亩草地上全部的牧草.多少头牛n天可以吃完m亩草地上全部的牧草,假设每亩草地原有的草数量相等,每天草地上的草都是匀速生长的.
输入
输入数据仅有一行包含两个用空格隔开的整数n和m.n和m都是不超过10000的正整数.
输出
输出一个整数.
样例输入
126 72
样例输出
36
提示
设1头牛1天吃1份牧草,则每公亩牧场上的牧草每天的生长量:(21×63÷30-12×28÷10)÷(63-28)=0.3(份),每公亩牧场上的原有草量:21×63÷30-0.3×63=25.2(份),则72公亩的牧场126天可提供牧草:(25.2 0.3×126)×72=4536(份),可供养4536÷126=36头牛.
var
n,m,s:integer;
begin
readln(n,m);
s:=trunc((25.2+0.3*n)*m/n);
writeln(s);
end.
var
n,m,s:integer;
begin
readln(n,m);
s:=trunc((25.2+0.3*n)*m/n);
writeln(s);
end.