Ответ(ы) на вопрос:
вычитание?...
наверное..
var a, b, min: integer;
begin
readln (a, b);
if a < b then min:=a else min:=b;
readln (a);
if a < min then min:=a;
writeln('наим=', min)
end.
Не нашли ответ?
Похожие вопросы