Написать программу, которая преобразует введенное пользователем количество дней в количество полных недель и оставшихся дней. Например, пользователь ввел 17 дней, программа должна вывести на экран 2 недели и 3 дня.

Question

Костяша

22 октября, 03:57

+2

Ответы (1)

Знаете ответ?

Никитий · Answer 1

Sub Zadanie23525370 ()

' Dim d As Integer

d = CInt (InputBox ("Кол-во дней?"))

MsgBox "Недель: " & d/7 & "; Дней: " & d mod 7

End Sub