Решить вот это задание.
Вот программа: var n,k,m,a,b: integer; begin readln(n); readln(k); readln(m); a:=n div (k+m); b:=n mod (k+m); if b=0 then a:=2*a else if b<=k then a:=2*a+1 else a:=2*a+2;<br>writeln(a); end.
Огромнейшее Вам спасибо! Вы меня очень выручили!
Подскажите, где вы этому научились?
Пожалуйста. Все начинается в школе. Решайте больше задач.