viết chương trình 3 số nguyên từ file de2.txt . Saubđó in ra màn hình số nguyên nhỏ nhất trong 3 số nguyên đó
2 câu trả lời
program nho_nhat;
uses crt;
var f:text;
a,b,c,min:integer;
begin
clrscr;
Assign(f,'de2.txt'); reset(f);
min:=a;
if min>b then min:=b;
if min>c then min:=c;
write('So nho nhat la: ',min);
readln;
end.
uses crt;
var f:text;
a,b,c,min:longint;
begin
clrscr;
assign(f,'de2.txt');reset(f);
read(f,a,b,c);
close(f);
min:=a;
if b<min then min:=b;
if c<min then min:=c;
write(min);
readln;
end.
