Viết chương trình pascal tìm số nhỏ nhất của 3 số nguyên a,b
Ae giả giúp mình vs ạ
0 bình luận về “Viết chương trình pascal tìm số nhỏ nhất của 3 số nguyên a,b Ae giả giúp mình vs ạ”
3 số thì phải là a, b, c chứ nhỉ?
—
Program BTT; Uses crt; Var a,b,c,min: longint; Begin Clrscr; Write(‘Nhap so a: ‘); Readln(a); Write(‘Nhap so b: ‘); Readln(b); Write(‘Nhap so c: ‘); Readln(c); min:=a; If b<min then min:=b; If c<min then min:=c; Write(‘GTNN la: ‘,min); Readln End.
3 số thì phải là a, b, c chứ nhỉ?
—
Program BTT;
Uses crt;
Var a,b,c,min: longint;
Begin
Clrscr;
Write(‘Nhap so a: ‘); Readln(a);
Write(‘Nhap so b: ‘); Readln(b);
Write(‘Nhap so c: ‘); Readln(c);
min:=a;
If b<min then min:=b;
If c<min then min:=c;
Write(‘GTNN la: ‘,min);
Readln
End.