Даны переменные a,b,c.Нужно найти минимальное из них (блок-схема)
Program x;
var a,b,c: integer;
begin
writeln(введите три числа);
readln(a,b,c);
if (a>b) and (b>c) then writeln(минимальное число, с);
if (a>b) and (c>b) then writeln(минимальное число, b);
if (a
end.
Оцени ответ