Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
pinok21rus
04.02.2023 06:22 •
Информатика
Объясните как делать эти ,только чтоб понятно было
👇
Увидеть ответ
Открыть все ответы
Ответ:
Гелакси27
04.02.2023
'VBScript
Sub Zadanie()
ReDim C(5, 6)
k_pos = 0
mini = LBound(C, 1)
minj = LBound(C, 2)
For i = LBound(C, 1) To UBound(C, 1)
For j = LBound(C, 2) To UBound(C, 2)
C(i, j) = Round(Rnd * 10)
if C(i, j) > 0 then k_pos = k_pos + 1
if C(i, j) < C(mini, minj) then
mini = i
minj = j
end if
Next
Next
MsgBox "min C(" & mini & ", " & minj & ")=" & C(mini, minj) & vbNewLine & "c>0: " & k_pos
End Sub
Call Zadanie()
4,4
(47 оценок)
Ответ:
husanov18p06h9l
04.02.2023
В 2сс:
27=16+8+2+1=2^4+2^3+2^1+2^0=1 1011 (2cc)
0,|27 * 2
0|54 *2
1|08 *2
0|16 *2
0|32 *2
0|64 *2
1|28 *2
0|56 *2
1|12 *2
0|24 *2
0|48 *2
0|96 *2
1|92 *2
1|84 *2
1|68 *2
1|36 *2
0|72 *2
1 |44 *2
0|88 *2
1|76 *2
1|52
+1
1|04 (последний байт при приближении =1100)
27, 27 = 1 1011, 0100 0101 0001 1110 1100 (в2сс) ≈11011,01001
27,27 = 1 B , 4 5 1 E B = 1B,451EC (в 16сс)
27, 27 = 11 011, 010 001 010 111 (в 2сс) =33,21217 ( в 8сс)
3 3, 2 1 2 7
4,7
(71 оценок)
Это интересно:
К
Компьютеры-и-электроника
28.07.2022
Как отправить видео: подробный гайд...
К
Кулинария-и-гостеприимство
14.01.2022
Как готовить подпаленную кукурузу на гриле: простой рецепт и полезные советы...
Ф
Финансы-и-бизнес
12.06.2020
Как создать маркетинговый календарь: советы для бизнеса...
О
Образование-и-коммуникации
26.01.2022
Как написать сочинение Как я провел лето : советы и рекомендации...
К
Компьютеры-и-электроника
18.01.2021
Как правильно пинговать IP адрес: простой гайд для начинающих...
Ф
Финансы-и-бизнес
21.12.2022
Как выбрать и купить восстановленный деревянный стол...
З
Здоровье
08.08.2020
8 советов по подготовке к приему к стоматологу: как не бояться и что вам нужно знать...
К
Компьютеры-и-электроника
05.09.2020
Как использовать контроллер Xbox 360 вместе с Windows...
К
Компьютеры-и-электроника
15.02.2021
Как избавиться от Mystart.Incredibar.Com: советы от экспертов...
К
Кулинария-и-гостеприимство
03.02.2020
Как использовать вафельницу: подробный гид по приготовлению вафель...
Новые ответы от MOGZ: Информатика
platonnikitos
25.04.2023
Валгоритме, записанном ниже, используются две переменные a и b....
hadisvv99
10.02.2022
1+2= 1+2= 1+2= 1+2= 1+2= 1+2= 1+2= 1+2=...
Ffffffsusjbshjxj
10.02.2022
Уводолея есть два кувшина 9 и 5 литров. как ему отмерить 3 литра?...
almira666ozs336
22.02.2023
Строки программы создания нового файла data.txt и записи в него строки ‘, информатики’ перемешаны со строками других программ. выберите необходимые для решения строки...
guldanaramazan
27.03.2023
№1. при сортировке одномерный массив изменялся следующим образом: 73 14 46 98 53 37 19 53 14 73 19 46 98 53 37 53 14 19 73 37 46 98 53 53 14 19 37 73 46 53 98 53 14 19...
Бота157
24.07.2020
HELP HELP HELP HELP HELP HELP HELP HELP HELP HELP HELP HELP ...
wannaone
23.03.2022
Объявить символьный массив из 10 элементов. Заполнить массив с клавиатуры. Вывести исходный массив на экран и массив в обратном порядке. Вывод организовать с выводом порядкового...
Monstrozacrs
02.11.2020
Кто такой автор? Что такое авторские права? Какие работы попадают под защиту авторского права нужно...
Tolganay11
03.08.2022
Ненажера Стецько пробрався перед обідом у шкільну їдальню, де вже були накриті столи, і почав швиденько з їдати ще тепленькі булочки, що стояли на столах. З першого столу...
vasiapasi17
13.09.2022
Используя цикл с параметром вычислить n!...
MOGZ ответил
Решить уравнение 20б. x^3-2x^2-5=0 x^4-3x^2+7=0...
Какой троп используется в данном предложении. сидит, понимаете, этот...
Решите уравннему (3х-1)(х+2)=20решение...
Найдите значение выражения0,3×7,5_0,5...
Орфоэпические нормы. 1. расставьте ударения в словах. укажите возможные...
Написать сочинение на тему: почему так важно осознавать ответственность...
Отрезки ab и dc лежат на параллельных прямых а отрезки ac и bd пересекаются...
Rewrite the sentences in direct speech i asked my friends what time...
Какое значение имеют растения в жизни человека?...
Вравнобедренном треугольнике abc с основанием ac внешний угол при вершине...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
Sub Zadanie()
ReDim C(5, 6)
k_pos = 0
mini = LBound(C, 1)
minj = LBound(C, 2)
For i = LBound(C, 1) To UBound(C, 1)
For j = LBound(C, 2) To UBound(C, 2)
C(i, j) = Round(Rnd * 10)
if C(i, j) > 0 then k_pos = k_pos + 1
if C(i, j) < C(mini, minj) then
mini = i
minj = j
end if
Next
Next
MsgBox "min C(" & mini & ", " & minj & ")=" & C(mini, minj) & vbNewLine & "c>0: " & k_pos
End Sub
Call Zadanie()