Viết phương trình nhập vào chiều cao của Trang , Ngân kiểm tra và in ra bạn có chiều cao hơn ra màn hình.
2 câu trả lời
program ss;
uses crt;
var m,n: integer;
begin
clrscr;
write('Nhap chieu cao cua Trang: ');
readln(m);
write('Nhap chieu cao cua Ngan: ');
readln(n);
if(m<n) then writeln(n);
if(m>n) then writeln(m);
if(m=n) then writeln('Trang cao bang Ngan');
readln;
end.
program ct;
uses crt;
var trang,ngan:integer;
begin
clrscr;
write('nhap chieu cao cua trang:=');readln(trang);
write('nhap chieu cao cua ngan:=');readln(ngan);
if trang>ngan then writeln(trang,' cao hon ngan');
if trang<ngan then writeln(ngan,'cao hon trang');
if trang= ngan then writeln('trang bang ngan');
readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
