ПОМОГИТЕ ПОЖАЛУЙСТА ПО ИНФОРМАТИКЕ!ОЧЕНЬ СРОЧНО! Даны положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Не используя операции умножения и деления, найти длину незанятой части отрезка A.

Вопрос:

ПОМОГИТЕ ПОЖАЛУЙСТА ПО ИНФОРМАТИКЕ!ОЧЕНЬ СРОЧНО!

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

Ответ учителя:

Ответ:

Код ниже

Объяснение:

program calcRest;

var A,B, diff: real;

begin

   writeln('Ведите числа A и B: ');

   readln(A,B);

   diff := A - B;

   while diff > B do begin

       diff := diff - B;

   end;

   writeln(diff);

end.

Другие вопросы
Создать вопрос

Похожие вопросы: