Question

Составить программу наименьшую из 4 чисел и вывода на экран его квадрата

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin
  var a:=ReadArrReal(4);
  Println('Наименьшее->',a.Min); 
  Println('Квадрат->',a.Min*a.Min);
end.

Answer 2

Для нахождения наименьшего из 4 чисел и вывода на экран его квадрата, вы можете использовать следующий код на языке программирования Python:

pythonCopy code
def find_min_square(a, b, c, d):
    min_number = min(a, b, c, d)
    min_square = min_number ** 2
    return min_square

# Вводим 4 числа с клавиатуры
num1 = float(input("Введите первое число: "))
num2 = float(input("Введите второе число: "))
num3 = float(input("Введите третье число: "))
num4 = float(input("Введите четвертое число: "))

result = find_min_square(num1, num2, num3, num4)
print(f"Наименьшее число из введенных: {result} и его квадрат: {result ** 2}")

Программа запросит у пользователя 4 числа, найдет наименьшее из них, вычислит его квадрат и выведет результат на экран.