
Вопрос задан 28.04.2021 в 13:44.
Предмет Информатика.
Спрашивает Гулевич Вероника.
1)заданы два числа если больше 1 то вычисляется их сумма если 2 то разность А если они равны то
произведения и 2)Заполните массив из 15 элементов числами из интервала от -10 до 10 вывести в строчку и вывести на экран порядковые номера :отрицательных элементовПОМОГИТЕ ПОЖАЛУЙСТА , ОЧЕНЬ НАДО ПОЖАЛУЙСТА!!!))))

Ответы на вопрос

Отвечает Ясінська Таня.
1
var a,b:integer;
begin
readln(a,b);
if a>b then
write(a+b);
if b>a then
write(b-a);
if a=b then
write(ab);
end.
2
type mas=Array [1..15] of integer;
var i:integer;
a:mas;
begin
randomize;
for i:=1 to 15
do begin
A[i]:=random(-10,10);
if A[i]<0 then
write(i,' ');
end;
end.
var a,b:integer;
begin
readln(a,b);
if a>b then
write(a+b);
if b>a then
write(b-a);
if a=b then
write(ab);
end.
2
type mas=Array [1..15] of integer;
var i:integer;
a:mas;
begin
randomize;
for i:=1 to 15
do begin
A[i]:=random(-10,10);
if A[i]<0 then
write(i,' ');
end;
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Конечно, я помогу вам с решением задачи!
- Вот код на языке Python, который решает эту задачу:
cssa = 3
b = 5
if a > 1 and b > 1:
print(a + b)
elif a == b:
print(a * b)
else:
print(abs(a - b))
Вы можете заменить значения a
и b
на любые другие числа, чтобы увидеть, как работает код.
- Вот код на языке Python, который заполняет массив из 15 элементов числами из интервала от -10 до 10 и выводит на экран порядковые номера отрицательных элементов:
scssimport random
arr = []
for i in range(15):
arr.append(random.randint(-10, 10))
print("Массив:", arr)
negative_indices = []
for i, elem in enumerate(arr):
if elem < 0:
negative_indices.append(i)
print("Отрицательные элементы находятся под индексами:", negative_indices)
Этот код использует функцию random.randint()
для генерации случайных чисел в заданном диапазоне. Затем он проходит по всем элементам массива и сохраняет индексы отрицательных элементов в отдельный список negative_indices
.


Топ вопросов за вчера в категории Информатика

Информатика 2132

Информатика 63

Информатика 14

Информатика 32

Информатика 19

Информатика 15

Информатика 175

Информатика 31

Информатика 48
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili