
Вопрос задан 06.08.2023 в 21:05.
Предмет Информатика.
Спрашивает Згонная Ульяна.
Составьте программу, которая заполняет массив из 10 элементов случайными целыми числами в диапазоне
от 1 до 10, а затем меняет последний и первый элемент местами и выыодит на экран исходный и полученный массив.

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

Отвечает Ахметзянова Карина.
Program mass;
Uses Crt;
Var
a: array [1..10] of integer;
i,c,b: byte ;
Begin
ClrScr;
For i :=1 to 10 do
begin
a[i]:= random (10);
writeln(a[i]);
end;
writeln;
b:=a[1];
c:=a[10];
a[1]:=c;
a[10]:=b;
For i :=1 to 10 do
writeln(a[i]);
end.
Uses Crt;
Var
a: array [1..10] of integer;
i,c,b: byte ;
Begin
ClrScr;
For i :=1 to 10 do
begin
a[i]:= random (10);
writeln(a[i]);
end;
writeln;
b:=a[1];
c:=a[10];
a[1]:=c;
a[10]:=b;
For i :=1 to 10 do
writeln(a[i]);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Конечно, вот пример программы на языке Python, которая выполняет указанные действия:
pythonimport random
# Создаем массив из 10 элементов случайными целыми числами от 1 до 10
array = [random.randint(1, 10) for _ in range(10)]
# Выводим исходный массив
print("Исходный массив:", array)
# Меняем местами первый и последний элементы
array[0], array[-1] = array[-1], array[0]
# Выводим полученный массив
print("Полученный массив:", array)
Программа использует библиотеку random
для генерации случайных чисел. В начале создается массив из 10 случайных чисел в заданном диапазоне, затем происходит обмен местами первого и последнего элементов, и наконец, выводятся на экран исходный и полученный массивы.


Похожие вопросы

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

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

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

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

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

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

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

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

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