Ответы на вопрос:
var a,b,min: real;
begin
readln(a);
readln(b);
if a< b then begin
min: =a;
end;
if b< a then begin
min: =b;
end;
end.
з.ы: решил на языке pascalabc, т.к. вы не
указали в условии требуемый язык программирования
Популярно: Информатика
-
Nastyamil68126.06.2023 01:14
-
viper99817.05.2022 03:22
-
shamsi300011.04.2022 18:24
-
MarGGoTV12.06.2023 08:41
-
Níkiskastarling2802.04.2022 01:26
-
polinaokuneva0oumyci17.07.2022 18:25
-
derest20.03.2020 16:01
-
Алисик98013.01.2021 17:03
-
диана246003.04.2023 07:26
-
Albina180930.12.2021 05:41