Напишите программу на языке Паскаль, которая получает на вход два числа: N и K. После этого программа должна вывести

Sonya

15

Конечно! Вот программа на языке Паскаль, которая решает данную задачу:

pascal

program Lesorub;

var

  N, K, R, O: integer;

begin

  write("Введите количество деревьев (N): ");

  readln(N);

  write("Введите количество лесорубов (K): ");

  readln(K);

  

  R := N div K; // количество деревьев, которые будут отданы каждому лесорубу для сруба

  O := N mod K; // количество деревьев, которые останутся нерубленными

  

  writeln("Количество деревьев, которые будут отданы каждому лесорубу: ", R);

  writeln("Количество деревьев, которые останутся нерубленными: ", O);

end.

Данная программа запрашивает у пользователя количество деревьев (N) и количество лесорубов (K). Затем она вычисляет количество деревьев (R), которые будут отданы каждому лесорубу для сруба, путем деления N на K с помощью оператора "div". Далее, она вычисляет количество деревьев (O), которые останутся нерубленными, путем вычисления остатка от деления N на K с помощью оператора "mod". Наконец, она выводит результаты на экран с помощью оператора "writeln".

Надеюсь, эта программа поможет школьнику понять решение задачи пошагово и детально.