Войти Регистрация Спроси ai-bota

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

Показать ответ

Ответ:

кика20051

05.10.2020 20:12

Sub Zadanie23525370()
   ' Dim d As Integer
   d = CInt(InputBox("Кол-во дней?"))

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

0,0(0 оценок)

Популярные вопросы: Информатика

stas952011217217

03.12.2020 12:03

Решить информатика начертить ...

BlackWolf05

23.12.2020 23:28

1. Определите значение переменной a после выполнения фрагмента программы: a := 10; if a 5 then a := 5;...

МурррKsKs

11.09.2021 23:16

Написать прогу на с++ напишите программу, которая выучить таблицу умножения. суть программы в том, что она будет печатать на экране, например: сколько будет 6*7? затем...

леся546576

05.11.2021 23:32

Посмотри рисунок под цифрами обозначены кнопки напиши значение каждой...

mmmdz

24.09.2020 07:05

Язык Python 3 Игровой кубик Есть игральный кубик с шестью гранями. На каждой грани значения от 1 до 6. За каждый бросок кубика вы получаете очки, которые выпадают на...

Ольга1738

14.01.2020 17:41

Выполните алгоритм представленный на блок схеме, если известно, что A=22...

sabrinairnfd

24.05.2021 23:36

У исполнителя Квадратор две команды, которым присвоены номера: 1. возведи в квадрат 2. прибавь b (b – неизвестное натуральное число) Первая из них возводит число на...

Zarishka1312

24.05.2021 23:36

как решить,без программы...

Тотах

25.05.2023 00:46

Опишите 5 различных случаев, когда вы являетесь исполнителем....

zabirovrobert

21.02.2022 07:55

Посмотрите на схему и Расставь числа в том порядке как менялась своё значение переменной b...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку