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
<span>End Sub
Первую строку не использовал, оставил для заголовков</span>
Будет напечатана сумма элементов массива от 7 до 11.
62
Ответ:
А) БАГВ
Б) БВГА
Объяснение:
Ip адрес состоит из 4-х чисел, разделённых точками, каждое из чисел должно находиться в диапазоне от 0 до 255. =>
А)
Начинаем с [2.17] после [17] мы должны поставить ещё число либо это будет концом ip адреса, ищем то, что мы могли бы поставить после [2.17 16] - не подходит т.к. получится [1716], а это больше 255, [.65] тоже не подходит по этой же причине. Остаётся только [8.121] подставляем [2.17/8.121] получается [178] - это число находится в диапазоне от 0 до 255 оставляем так. Нам остаётся подставить ещё 2 фрагмента. Берём [.65] и подставляем в начало [.65/2.178.121] полуяви число [.652] оно не подходит т.к. больше 255, значит подставляем [.65] в конец и получаем [2.178.121.65] в конце ip адреса не обязательно должно стоять 4-х значное число. У нас осталось [16] подставляем в начало и получаем [162.178.121.65] это будет готовым ip адресом.
Пусть первоначально число имело вид abc, После зачеркивания второй цифры оно превратилось в ac, а когда зачеркнутую b приписали справа, получилось acb=456, откуда понятно, что фактически поменяли местами цифры b и c. Поэтому программа должна получить число (456) и поменять в нем последнюю цифру с соседней, получив 465.
<u>MS DOS QBasic 1.0</u>
DIM r AS INTEGER
CLS
INPUT r
b = r MOD 10
a = INT(r / 100)
c = INT(r / 10) MOD 10
r = 100 * a + 10 * b + c
PRINT "x="; r
Алгоритм может быть, например, таким. Если нужно вывести нулевое число Фибоначчи, выведем 1, иначе будем считать. Сохраним в переменную номер текущего числа Фибоначчи (изначально 1) и значения текущего и предыдущего элементов (в начале 1 и 1), затем в цикле будем пересчитывать значения элементов, увеличивая номер текущего элемента. Когда номер элемента совпадёт с нужным, выведем ответ.
Реализация (python 3):
n = int(input())
if n == 0:
print(1)
else:
prev, curr = 1, 1
i = 1
while i < n:
curr, prev = prev + curr, curr
i += 1
print(curr)
Запустив программу, можно узнать, что f10 = 89, f25 = 121393, а f40 = <span>165580141</span>