Program a2; var a,b,c,min: real; begin writeln('введите три числа'); readln(a,b,c); min: =a; if b if c writeln('min=',min) end.как а)а=10,b=5 и с =1 б)а=10,b=5 и с =7 в)а=2,b=10,с=5

микадо1 микадо1    2   10.09.2019 12:20    0

Ответы
kvpopochku kvpopochku  07.10.2020 05:17
A: min =1;
Б: min =5
В: min =2
var a,b,c,min:real;
begin
writeln('Введите три числа');
readln(a,b,c);
min:=a;
if b<min then min:=b;
if c<min then min:=c;
writeln('min= ' ,min);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика