Циклы

@tagger · Регистрация: 25.05.2009

Студворк — интернет-сервис помощи студентам

2 задачи:

У гусей и кроликов вместе 64 лапы. Сколько могло быть кроликов и кусей? (указать все сочетания)
Написать прогу, которая выводит таблицу умножения и сложения натуральных чисел в десятичной системе счисления.

@Sich_Taras · 08.10.2009, 03:44

15 кроликов 2 гуся
14 кроликов 4 гуся
13 кроликов 6 гусей
............................
1 кролик 30 гусей

с таблицей думаю справишься

@EducatedFool · 08.10.2009, 15:35

Написать прогу, которая выводит таблицу умножения и сложения натуральных чисел в десятичной системе счисления.

Эта программа выведет Вам всю таблицу умножения натуральных чисел:

Visual Basic
1
2
3
4
5
6
7
8
9
Sub ТаблицаУмножения()
    'Составить программу,    которая печатает таблицу умножения  натуральных чисел
    'в десятичной системе счисления.
    i = 2: Application.EnableCancelKey = xlDisabled: On Error Resume Next
    Do
        Cells(i, 1) = i: Cells(1, i) = i: For j = 2 To i: Cells(i, j) = i * j: Cells(j, i) = i * j: Next j
        MsgBox i: i = i + 1
    Loop
End Sub

Не забудьте распечатать таблицу, когда программа завершит свою работу.

@tagger · 10.10.2009, 22:32 **[ТС]**

Кстати, вот решение первой задачи:

Visual Basic
1
2
3
4
5
6
7
8
9
Public Sub kdd()
Dim x As Integer
Dim y As Integer
For x = 0 To 32
For y = 0 To 16
If 2 * x + 4 * y = 64 Then Debug.Print x, y
Next y
Next x
End Sub

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@tagger 0 / 0 / 0 Регистрация: 25.05.2009 Сообщений: 12

	Циклы 08.10.2009, 01:31. Показов 2841. Ответов 3 Метки нет (Все метки) 2 задачи: У гусей и кроликов вместе 64 лапы. Сколько могло быть кроликов и кусей? (указать все сочетания) Написать прогу, которая выводит таблицу умножения и сложения натуральных чисел в десятичной системе счисления. 0

@Sich_Taras 14 / 14 / 4 Регистрация: 08.10.2009 Сообщений: 114
	08.10.2009, 03:44
	15 кроликов 2 гуся 14 кроликов 4 гуся 13 кроликов 6 гусей ............................ 1 кролик 30 гусей с таблицей думаю справишься 0

Циклы

Решение