Даны целые положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Используя операцию деления нацело, найти количество отрезков B, размещенных на отрезке A) — Pascal(Паскаль)

Program Integer4;

var
  a, b, otr: integer;

begin
  repeat
    write('Enter please A =');
    readln(a);
    write('Enter please B =');
    readln(b);
  until (a > b);
  otr := a div b;
  writeln('количество отрезков B=', otr);

end.

Похожие записи/страницы:

Leave a Comment

+ 80 = 81