Question

СРОЧНО! Выручите пж

Год на планете Z делится на месяцы. Все месяцы длятся по M дней. От начала года прошло D дней. Запишите дату так, как это делают на Земле.
9.11 — означает, что идет 9-ый день 11-ого года.
Выделите операторы программы для решения этой задач

Program Ufo;

Var M, D : integer; // Дано

month, day: integer; // Найти

Begin

[ Readln / Writeln / Integer] (M, D);

month := [ D mod M / D mod M / D / M ];

day := [ D mod M / D div M / M mod D / M div D];

[ writeln / readln] ( [ day / D / month / M] ,’.’ , [ month / day / D / M] );

End.

Answer 1

Объяснение:

Program Ufo;

Var

M, D, month, day: integer; //объявление переменных

Begin

Readln(M, D); //ввод значений M и D с клавиатуры

month := D div M; //вычисление номера месяца

day := D mod M; //вычисление дня в месяце

Writeln(day, '.', month); //вывод результата на экран в формате дд.мм

End.

Операторы программы для решения задачи:

Readln(M, D) - ввод значений M и D с клавиатуры

month := D div M - вычисление номера месяца путем деления D на M

day := D mod M - вычисление дня в месяце путем взятия остатка от деления D на M

Writeln(day, '.', month) - вывод результата на экран в формате дд.мм, разделяя день и месяц точкой.