Вопрос, который вызвал трудности
Имеется 100 руб. Сколько быков, коров и телят можно купить на все эти деньги, если плата за быка – 10 руб., за корову – 5 руб., (программа Паскаль)
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
program z1;
uses crt;
var a,b,c:integer;
begin
for a:= 1 to 10 do
for b:=1 to 20 do
for c:=1 to 200 do с:= 100-(a+b);
begin
if (a+b+c=100)and (a*10+b*5+c*0.5=100) then if (a*10+b*5+c*0.5=100)
writeln (a:6,b:6,c:6);
end;
end.
uses crt;
var a,b,c:integer;
begin
for a:= 1 to 10 do
for b:=1 to 20 do
for c:=1 to 200 do с:= 100-(a+b);
begin
if (a+b+c=100)and (a*10+b*5+c*0.5=100) then if (a*10+b*5+c*0.5=100)
writeln (a:6,b:6,c:6);
end;
end.