1) Viết chương trình so sánh hai số a và b theo hai dạng (đủ, thiếu) 2) Sửa lỗi đoạn chương trình sau: Program sua loi; var a,b,s =real Begin write ('nhap a=') , readln('a'); write (nhap b=') , readln(b') s:= (a*b)/2; write ('s=s); readln End.
2 câu trả lời
1.
Program sosanhavab;
uses crt;
var a,b: integer;
begin
clrscr;
write('nhap a:'); readln(a);
write('nhap b:'); readln(b);
if a>b then writeln ('a lon hon b') else if a<b then writeln ('b lon hon a')
else writeln ('a bang b');
readln;
end.
2.
Program sua loi;
uses crt;
var a,b,s : real;
Begin
clrscr;
write ('nhap a=') ;readln(a);
write (nhap b=') ; readln(b);
s:= (a*b)/2;
write ('s=',s);
readln;
End.
Câu hỏi trong lớp
Xem thêm