Цитата:
Сообщение от Евгений
Код:
var a,b:integer;
begin
a:=543; b:=130;
Writeln('Pomestitsja : ',(a div b),' ras');
Readln;
end.
|
Гениально! Ещё бы это да выложить 7 лет назад, когда, собственно, и поступил запрос на решение этой архисложной задачи, так и цены бы программе не было!