Сформировать массив из 27 элементов и заполнить его случайными целыми числами в диапазоне [-45.45]

@Robokop · Регистрация: 23.12.2012

Студворк — интернет-сервис помощи студентам

Ребят помогите пожалуйста в basic )
1.Сформулировать массив K состоящий из 27 элементов и заполнить его случайными целыми числами в диапазоне [-45.45]
2.Найти произведение элементов массива
3.В массиве найти максимальный элемент и его порядковый номер
4.Заменить все отрицательные элементы массива на 0

SoftIce · 23.12.2012, 08:14

Не по теме:

Robokop, всё это было уже 100500 раз.

@Robokop · 23.12.2012, 08:27 **[ТС]**

Сообщение от SoftIce

Не по теме:

Robokop, всё это было уже 100500 раз.

искал , не смог найти

@sco43 · 23.12.2012, 10:25

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Private Sub Command1_Click()
Form1.Cls
Dim p As Double, m%, n%
Dim k%(27)
'formiruem
For i = 1 To 27
 k(i) = Int(Rnd(1) * 91) - 45
 Print k(i);
Next i
Print
'proisvedenie
p = 1
For i = 1 To 27
 p = p * k(i)
Next i
Print p
'maximum
m = k(1): n = 1
For i = 2 To 27
 If m < k(i) Then m = k(i): n = i
Next i
Print "max = "; m; "nomer = "; n
'obnulim
For i = 1 To 27
 If k(i) < 0 Then k(i) = 0
 Print k(i);
Next i
End Sub

@Robokop · 24.12.2012, 09:45 **[ТС]**

спасибо )

Новые блоги и статьи Все статьи Все блоги /
Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита, которое может. . .	Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip

@Robokop 0 / 0 / 0 Регистрация: 23.12.2012 Сообщений: 9

	Сформировать массив из 27 элементов и заполнить его случайными целыми числами в диапазоне [-45.45] 23.12.2012, 08:10. Показов 2099. Ответов 4 Метки нет (Все метки) Ребят помогите пожалуйста в basic ) 1.Сформулировать массив K состоящий из 27 элементов и заполнить его случайными целыми числами в диапазоне [-45.45] 2.Найти произведение элементов массива 3.В массиве найти максимальный элемент и его порядковый номер 4.Заменить все отрицательные элементы массива на 0 0

SoftIce
	23.12.2012, 08:14
	Не по теме: Robokop, всё это было уже 100500 раз. 0

@Robokop 0 / 0 / 0 Регистрация: 23.12.2012 Сообщений: 9
	24.12.2012, 09:45 [ТС]
	спасибо ) 0