K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

uses crt;

var a,b,c,nn:integer;

begin

clrscr;

readln(a,b,c);

nn:=a;

if nn>b then nn:=b;

if nn>c then nn:=c;

writeln(nn);

readln;

end.