2 câu trả lời
program bt;
Uses crt;
Var
a,b:real;
Begin
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
If a>b then write(b,' la so nho nhat') else
if a<b then write(a,' la so nho nhat');
Readln;
End.
#HNgoc
#Chuc_em_hoc_tot
program nho;
uses crt;
var a, b : real;
begin
clrscr;
write('nhap gia tri so thuc a :');readln(a);
write('nhap gia tri so thuc b :');readln(b);
if a > b then writeln('b la so nho nhat trong hai so')
else writeln('a la so nho nhat trong hai so ');
readln
end.
Câu hỏi trong lớp
Xem thêm