Вопрос задан 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 чисел с клавиатуры, находит два наибольших числа и выводит их на экран.
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
	- 
			
Математика
 - 
			
Литература
 - 
			
Алгебра
 - 
			
Русский язык
 - 
			
Геометрия
 - 
			
Английский язык
 - 
			
Химия
 - 
			
Физика
 - 
			
Биология
 - 
			
Другие предметы
 - 
			
История
 - 
			
Обществознание
 - 
			
Окружающий мир
 - 
			
География
 - 
			
Українська мова
 - 
			
Информатика
 - 
			
Українська література
 - 
			
Қазақ тiлi
 - 
			
Экономика
 - 
			
Музыка
 - 
			
Право
 - 
			
Беларуская мова
 - 
			
Французский язык
 - 
			
Немецкий язык
 - 
			
МХК
 - 
			
ОБЖ
 - 
			
Психология
 - 
			
Физкультура и спорт
 - 
			
Астрономия
 - 
			
Кыргыз тили
 - 
			
Оʻzbek tili
 
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			
			