Решаем задачи Абрамян на Паскале. Integer 5

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

Решение:

program Integer5;
var
  A, B, Res: Integer;
begin
  Write('Введите длину отрезка A: ');
  Readln(A);
  Write('Введите длину отрезка B: ');
  Readln(B);
  Res:=A mod B;
  Writeln('На отрезке A не занято: ',Res);
end.

program Integer5;

var

A, B, Res: Integer;

begin

Write('Введите длину отрезка A: ');

Readln(A);

Write('Введите длину отрезка B: ');

Readln(B);

Res:=A mod B;

Writeln('На отрезке A не занято: ',Res);

end.

Другие задачи из раздела Integer можно посмотреть здесь.

Решаем задачи Абрамян на Паскале. Integer 5

Комментарии:

Добавить комментарий Отменить ответ