
Вопрос задан 28.09.2023 в 03:09.
Предмет Информатика.
Спрашивает Зимина Маша.
1. Вводится число n. Затем с клавиатуры вводится число n. Заменить все отрицательные числа на
положительные с таким же модулем и вывести их на экран.2. Вводится число n( n>2). Затем с клавиатура выводится n чисел. Вывести два наибольших числа из введённых

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

Отвечает Гутырчик Альбина.
uses CRT;
const n = 3;
var z,i : Integer;
arr : array [1..n] of Integer;
begin
clrscr;
{Ввод данных}
for i:=1 to n do
begin
writeln('Введите ', i, '-число');
readln(arr[i])
end;
{Вычисление того что требуется}
for i:=1 to n do
if arr[i]<0 then arr[i] :=-arr[i];
{Вывод}
for i := 1 to n do
writeln(arr[i]:6);
repeat until keypressed
end.
Объяснение:



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
- Вот пример программы на Python, которая реализует первую задачу:
pythonn = int(input("Введите число n: "))
numbers = []
for i in range(n):
num = int(input(f"Введите число {i + 1}: "))
if num < 0:
num = abs(num)
numbers.append(num)
print("Числа с заменой отрицательных на положительные:")
for num in numbers:
print(num)
Эта программа сначала запрашивает число n
, затем считывает n
чисел с клавиатуры, заменяет отрицательные числа на их модуль и выводит их на экран.
- Вот пример программы на Python, которая решает вторую задачу:
pythonn = int(input("Введите число n (n > 2): "))
numbers = []
if n <= 2:
print("Число n должно быть больше 2.")
else:
for i in range(n):
num = int(input(f"Введите число {i + 1}: "))
numbers.append(num)
# Находим два наибольших числа
numbers.sort(reverse=True)
max1 = numbers[0]
max2 = numbers[1]
print(f"Два наибольших числа: {max1} и {max2}")
Эта программа сначала запрашивает число n
(должно быть больше 2), затем считывает n
чисел с клавиатуры, находит два наибольших числа и выводит их на экран.


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

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

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

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

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

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

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

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