Bài 6. Câu lệnh điều kiện

NT

Viết chương trình nếu a,b >0 thì tính và in ra màn hình tích của a,b ngược lại hiển thị yêu cầu nhập lại

NT
4 tháng 1 2023 lúc 14:56

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if (a>0) and (b>0) then writeln(a*b)

else writeln('Nhap lai');

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
LP
Xem chi tiết
H24
Xem chi tiết
LS
Xem chi tiết
NT
Xem chi tiết
KN
Xem chi tiết
H24
Xem chi tiết
NT
Xem chi tiết
NG
Xem chi tiết
H24
Xem chi tiết