Домашние задания: Информатика

Напишите программу, которая вычисляет квадрат наименьшего из четырёх чисел

Программу, значит, написать... -Это можно. Только на каком языке программирования сделать сие? - Нет, программе-то без разницы, на каком языке программирования она написана, а вот учитель может задать вопрос: а с чего это вдруг программа написана на этом языке программирования, а не на том, который он преподаёт.

Ладно, напишу, пожалуй, на Паскале (Pascal).

Program P1;
uses crt;
var a, b, c, d, k, min: real;
begin
clrscr;
write ('Введите 1-ое число: ');
readln (a);
write ('Введите 2-ое число: ');
readln (b);
write ('Введите 3-е число: ');
readln (c);
write ('Введите 4-ое число: ');
readln (d);
if (a<b) and (a<c) and (a<d) then min:=a else
if (b<a) and (b<c) and (b<d) then min:=b else
if (c<a) and (c<b) and (c<d) then min:=c else
if (d<a) and (d<b) and (d<c) then min:=d else
if (a=b) and (a<c) and (a<d) then min:=a else
if (a=c) and (a<b) and (a<d) then min:=a else
if (a=d) and (a<b) and (a<c) then min:=a else
if (b=c) and (b<a) and (b<d) then min:=b else
if (b=d) and (b<a) and (b<c) then min:=b else
if (c=d) and (c<a) and (c<b) then min:=c;
k:=sqr (min);
write ('Квадрат наименьшего/наименьших из 4 чисел: ', k);
readkey;
end.
Александр Пульнев
Александр Пульнев
43 559
Лучший ответ
На паскале тебе уже написали, так что напишу на Python:
numArr = [float(input(f"Введите {i + 1} число: ")) for i in range(4)]
print(min(numArr)**2)
Сергей Орлов
Сергей Орлов
6 123