
Вопрос задан 23.06.2023 в 08:03.
Предмет Информатика.
Спрашивает Цыпан Ульяна.
44БАЛЛА❤️ помогите пожалуйста информатика❤️ --С клавиатуры вводятся три числа. Возвести в квадрат
те из них, значения которых отрицательны, и в третью степень — положительные. Результаты вывести на экран.ps-ПАСКАЛЬ

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

Отвечает Криворученко Дарья.
Ответ:
arr = []
def test():
a = int(input())
arr.append(a)
if len(arr) < 3:
test()
test()
arr2 = []
for i in arr:
if i < 0:
arr2.append(i ** 2)
else:
arr2.append(i ** 3)
print("\n")
for i in arr2:
print(i)



Отвечает Кругликов Максик.
Решение представлено во вложении.
Язык: Pascal




Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Привет! Конечно, помогу. Вот пример программы на Паскале для выполнения задачи:
pascalprogram SquareCubeCalculator; var num1, num2, num3: real; begin // Вводим три числа с клавиатуры write('Введите первое число: '); readln(num1); write('Введите второе число: '); readln(num2); write('Введите третье число: '); readln(num3); // Возводим в квадрат отрицательные числа и в третью степень положительные if num1 < 0 then num1 := sqr(num1) // sqr() возвращает квадрат числа else num1 := power(num1, 3); // power() возводит число в степень if num2 < 0 then num2 := sqr(num2) else num2 := power(num2, 3); if num3 < 0 then num3 := sqr(num3) else num3 := power(num3, 3); // Выводим результаты writeln('Результат для первого числа: ', num1); writeln('Результат для второго числа: ', num2); writeln('Результат для третьего числа: ', num3); end.
Надеюсь, это поможет! Если есть вопросы, не стесняйся спрашивать.


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

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

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

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

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

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

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

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