Решить задачу в Pascal ABCДаны два целых числа. Разделить каждое число на целое число d.Найти произведение их остатков от деления.
Решить задачу в Pascal ABC
Даны два целых числа. Разделить каждое число на целое число d.
Найти произведение их остатков от деления.
Ответ(ы) на вопрос:
var
a, b, d: integer;
begin
readln(a, b, d);
writeln((a mod d) * (b mod d));
end.
Не нашли ответ?
Похожие вопросы