Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
lesivarshavska
10.03.2021 14:34 •
Информатика
Задание н.2Заполните таблицу ВИДЫ РОБОТОВ И ПРИМЕРЫ
👇
Увидеть ответ
Открыть все ответы
Ответ:
Гелакси27
10.03.2021
'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
10.03.2021
В 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 оценок)
Это интересно:
З
Здоровье
12.04.2021
Основные способы избавления от язвы во рту...
П
Питомцы-и-животные
28.06.2021
Играть с попугаем - просто и весело...
К
Кулинария-и-гостеприимство
15.01.2022
Как жарить креветки: секреты приготовления вкуснейшей закуски...
К
Кулинария-и-гостеприимство
02.04.2023
Купить семена льна: Советы по выбору и покупке...
К
Компьютеры-и-электроника
27.10.2022
5 простых способов избежать травли в интернете...
О
Образование-и-коммуникации
21.03.2023
10 способов развить способность к обучению...
Ф
Финансы-и-бизнес
17.08.2020
Как перевести деньги через Western Union: шаг за шагом...
Х
Хобби-и-рукоделие
25.10.2020
Как связать на спицах игрушечного медведя...
О
Образование-и-коммуникации
07.03.2022
Как читать показания линейки: простой гайд...
П
Питомцы-и-животные
27.07.2021
Как измерить температуру у лошади: советы от опытных ветеринаров и коневодов...
Новые ответы от MOGZ: Информатика
Vicka2006
20.05.2022
Сформируйте массив из 12 случайных чисел, которые принадлежат промежутку (-5; 5). выведите 4 первых элемента массива в строку, а 3 последних элемента в столбец...
228alex777
16.01.2021
Впаскале с repeat. составьте программу, которая выводит на экран сумму нечетных чисел от 36 до 66....
adelina121212
16.01.2021
Напишите сочетания клавиш (например: alt+f4), при которых можно сделать следущее: переместить курсор на начало документа. люди добрые!...
AngelinaMail11
19.03.2023
Массив из 12 элементов от 150 до 190 ввести случайным образом с random и: 1)определить есть ли хотя бы 1 ученик, рост которого больше 180 см? 2)определить сколько...
KozlovaPolina
15.01.2022
Посчитать в массиве из 10 чисел количество положительных элементов. pascal...
гпү
28.10.2020
Статья, набранная на компьютере, содержит 16 страниц, на каждой странице 40 строк, в каждой строке 40 символов. определите информационный объём статьи в одной из кодировок...
ASTRA5555
29.09.2022
Составьте программу которая заменяет в строке s буквы е на и и буквы а на о...
YanaRy
29.09.2022
Составьте программу по информатике которая удаляет в строке s все пробелы, и заменяет их на точки....
Элиана01
29.09.2022
Какое слово получится если в слове каприз убрать 1 букву...
ginfv
14.01.2021
Определите правило преобразования информации: клавиатура-ж обновление-с сканер-?...
MOGZ ответил
Вставь пропущенные слова. каким членом предложения являются. (где?...
Какую силу надо принять чтобы поднять 60 кг плотностью 0,01...
Напишите по 3 предложения с was/ и were/...
2. gespräch im reisebüro: ergänzen sie im dialog die fehlenden...
Сделайте синтаксический разбор предложения. закружилась пыль по...
Ввоскресенье коля провел 1 ч20 мин с друзьями в детском парке....
Отрезок длиной 12 см разделили га 2 равные части. чему равна длина...
Дано: p=30 см разность 2-х сторон =9 см один из внешних углов острый...
Синтоксический разбор предложения через стекло чувствуешь весеннее...
Морфологический разбор местоимения мои (мн.p)...
Полный доступ к 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()