Viết chương trình nhập vào 2 số, kiểm tra xem số vừa nhập là số âm hay số dương và in kết quả ra màn hình
2 câu trả lời
Program bai_lam;
uses crt;
var a,b:integer;
Begin
Write('nhap gia tri cho a');readln(a);
Write('nhap gia tri cho b');readln(b);
If a>0 then write('a la so duong');
else ('a la so am');
If b>0 then write('b la so duong');
else ('b la so am');
Readln;
End.
PROGRAM kiemtrasoamduong;
uses crt;
VAR a,b:integer;
BEGIN
clrscr;
write('Nhap vao a:'); readln(a);
write('Nhap vao b:'); readln(b);
IF a>0 THEN writeln('So am la', a);
ELSE writeln('So duong la ', a);
IF b>0 THEN writeln('So am la', b);
ELSE writeln('So duong la ', b);
readln;
END.
Câu hỏi trong lớp
Xem thêm