Убабушки есть куры и утки. их всего 20 штук. одна курица весит 3 кг, одна утка 10 кг? составить программу, которая позволяет,ввести количество кур, и на ходить общий вес птиц?
Program Frank; var k,y,obshiives:integer; begin writeln('Введи кол-во кур '); readln(k); y:=20-k; obshiives:=(k*3)+(y*10); writeln('Общий вес птиц:= ',obshiives); end.
Program Frank;
var k,y,obshiives:integer;
begin
writeln('Введи кол-во кур ');
readln(k);
y:=20-k;
obshiives:=(k*3)+(y*10);
writeln('Общий вес птиц:= ',obshiives);
end.