Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 17.10.2015
Сообщений: 16
1

Написать программу, которая для заданного целого числа печатает следующую таблицу

17.10.2015, 21:53. Показов 1392. Ответов 5
Метки нет (Все метки)

Помогите, пожалуйста.

1. Написать программу, которая для заданного целого числа печатает следующую таблицу:
а
a^3 a^6
a^6 a^3 a

2. Программа. Найти сумму цифр заданного натурального числа.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.10.2015, 21:53
Ответы с готовыми решениями:

Написать программу, которая для заданного целого числа а печатает таблицу
а а3 а6 а6 а3 а

Написать программу, которая для заданного целого числа а печатает таблицу
2) Написать программу, которая для заданного целого числа а печатает таблицу, используя только...

Написать программу, которая для заданного А печатает следующую таблицу А
Написать программу, которая для заданного А печатает следующую таблицу А:...

Для заданного целого числа а напечатать следующую таблицу: a a3 a6 a6 a3 a
12. Для заданного целого числа а напечатать следующую таблицу: a a3 a6 a6 a3 a Помогите,...

5
5543 / 1348 / 148
Регистрация: 08.02.2009
Сообщений: 4,086
Записей в блоге: 30
17.10.2015, 22:11 2
С какого пункта помогать, с самого начала?

Вы вообще в чём пишете? Это таблица Excel, таблица Word, база Access или просто обыкновенный текст через табуляцию?

Добавлено через 10 минут
Ну раз молчок и нежелание помочь самому себе, вот наугад в ворде:
Visual Basic
1
2
3
4
5
6
7
8
9
Option Explicit
 
Sub ЧудоТаблица()
Const a = "10" 'тут задать целое число
 
Selection.TypeParagraph
Selection.TypeText "a" & vbTab & "a ^ 3" & vbTab & "a ^ 6" & vbCr & _
                    a & vbTab & a ^ 3 & vbTab & a ^ 6
End Sub
0
0 / 0 / 0
Регистрация: 17.10.2015
Сообщений: 16
17.10.2015, 22:13  [ТС] 3
Sasha_Smirnov, Эксель это. Желательно с 1го пункта
0
15019 / 6347 / 1725
Регистрация: 24.09.2011
Сообщений: 9,976
17.10.2015, 22:15 4
tesqoo,
2. Тема "сумма цифр" раскрыта чуть более чем полностью
Вычислить, чему равна сумма цифр числа
0
0 / 0 / 0
Регистрация: 17.10.2015
Сообщений: 16
17.10.2015, 22:32  [ТС] 5
Sasha_Smirnov, Прошу прощения, но это не нежелание помочь себе и молчок. Это просто я не ожидал такого быстрого отклика. Спасибо вам
А ещё такой момент. Можно ли это как-нибудь сделать через active cell

Добавлено через 15 минут
И если не трудно, то, пожалуйста, есть какие-нибудь идеи по поводу:
Программа. Дано натуральное k. Напечатать k-е число последовательности
А) 12345678910111213..., в которой выписаны подряд все натуральные числа.
У меня есть какие-то наброски
Public function prog (k)
Dim s as string
For i = 1 to k
S = s & (str(i))
If len(S)> K
Exit trim for
Что-то вот в этом роде.

Добавлено через 33 секунды
Казанский, спасибо за отклик
0
5543 / 1348 / 148
Регистрация: 08.02.2009
Сообщений: 4,086
Записей в блоге: 30
19.10.2015, 19:30 6
На основе простого кода Toxa33rus в теме Операторы цикла.

Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub What_k()
    k = 11
     
    Do While k >= Len(nutstr)
      a = a + 1
      nutstr = nutstr & a
    Loop
     
    InputBox k & "-е число равно " & Mid(nutstr, k, 1), k, nutstr
End Sub

Также есть чудесный код кот Бегемот’а (так, полюбоваться): Составить программу , печатающую для данного натурального числа...!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.10.2015, 19:30

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Функции. побитовые операции. Написать функцию, которая для заданного целого числа Х вычисляет количество единичных битов в этом числе
Здравствуйте, уважаемые мастера программирования. Нуждаюсь в вашей помощи. Написать функцию,...

Написать программу, которая для заданного натурального числа
Написать программу, которая для заданного натурального числа: • определяет число, полученное...

Для заданного числа Н(1<Н<10000) написать программу, которая находит все совершенные числа, меньшие Н
Число называется совершенным,если сумма его делителей (кроме него самого) равна этому числи....

Написать программу которая для заданного числа решает задачи
Данно натуральное число длиной не менее 10 символов. Нужно написать программу которая для заданного...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.