Вопрос задан 23.06.2023 в 08:03. Предмет Информатика. Спрашивает Цыпан Ульяна.

44БАЛЛА❤️ помогите пожалуйста информатика❤️ --С клавиатуры вводятся три числа. Возвести в квадрат

те из них, значения которых отрицательны, и в третью степень — положительные. Результаты вывести на экран.ps-ПАСКАЛЬ​
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Криворученко Дарья.

Ответ:

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)

0 0
Отвечает Кругликов Максик.

Решение представлено во вложении.

Язык: Pascal


0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Привет! Конечно, помогу. Вот пример программы на Паскале для выполнения задачи:

pascal
program 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.

Надеюсь, это поможет! Если есть вопросы, не стесняйся спрашивать.

0 0

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

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

Последние заданные вопросы в категории Информатика

Задать вопрос