Составить блок-схему и написать на VBA процедуру, организующую ввод с клавиатуры восьми

Question

Составить блок-схему и написать на VBA процедуру, организующую ввод с клавиатуры восьми

Составить блок-схему и написать на VBA функцию, организующую ввод с клавиатуры восьми слов, с следующей распечаткой на рабочем листе таблицы по форме: Слово Длина_слова Начальная_буква_слова Заключительная_буква_слова Элементы ввода соединить в массив.

Задать свой вопрос

Арсений Зимянин
Информатика
2019-07-28 04:31:18
3
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

просклоняй прилагательные:яркий свет. Яркое солнце. Ясная бабочка

Человек и телега движутся навстречу друг другу, при этом масса человека в

При полном сгорании 4,4 г. углеводорода вышло 6,72 л. углекислого газа

Какое из данных событий произошлоКакое из данных событий произошло ранее иных?1)Творенье

на картинки изображена пирамида SABCD.запиши обозначения боковых рёбер,боковых граней и

ПОЖАЛУЙСТА ПОМОГИТЕЕЕ1.Чем отличается лампа накаливания от дуговой лампы?2.Кто и как

решить. одна сторона треугольника равна a, 2-ая-3,а 3-я-в два раза больше

Работники фирмы quot;Булочкаquot;, занимающейся кондитерским созданием,являются владельцами.

Напишите по этому тексту сжатое изложение Мир юношества расширяется быстро и повседневно.

Предложил черт лентяю: Всякий раз, как перейдешь этот волшебный мост, твои деньги удвоятся.

Amina · Answer 1 · 2019-07-28 04:39:30+3:00

Sub z()
Dim a(8) As String
For i = 1 To 8
a(i) = InputBox("Введи слово")
Next i
For i = 1 To 8
Cells(i + 1, 1) = a(i)
n = Len(a(i))
Cells(i + 1, 2) = n
Cells(i + 1, 3) = Mid(a(i), 1, 1)
Cells(i + 1, 4) = Mid(a(i), n, 1)
Next i
End Sub

Первую строчку не использовал, оставил для заголовков

О проекте

Составить блок-схему и написать на VBA процедуру, организующую ввод с клавиатуры восьми

Добро пожаловать!