Question

Составить программу: Вводятся 3 числа. Если среди них есть четные, то возвести их в квадрат. Вывести эти числа. Например: ввод 1,5,6. Вывод: 1,5,36.

Answer 1

===== PascalABC.NET =====

begin

 ReadArrInteger(3).Select(p -> p.IsEven ? p * p : p).Println(',')

end.

Замечание: В Паскаль данные разделяются пробелами, или переводами строки (клавиша Enter), поэтому вводить черз запятую не выйдет )))

Answer 2

Вот пример программы на языке Python, которая реализует описанную логику:

pythonCopy code
# Ввод трех чисел
number1 = int(input("Введите первое число: "))
number2 = int(input("Введите второе число: "))
number3 = int(input("Введите третье число: "))

# Проверка чисел на четность и возведение в квадрат, если число четное
if number1 % 2 == 0:
    number1 = number1 ** 2

if number2 % 2 == 0:
    number2 = number2 ** 2

if number3 % 2 == 0:
    number3 = number3 ** 2

# Вывод чисел
print(number1, number2, number3)

Вы можете скопировать этот код и запустить его на своем компьютере или в онлайн-интерпретаторе Python, чтобы проверить его работу.