Bài 8: Em hãy viết chương trình theo các bước sau: a) Nhập vào ba cạnh của một tam giác b) Sử dụng câu lệnh If...then lồng nhau để thông báo ra màn hình kết quả trong các trường hợp sau: - Tam giác đều - Tam giác cân - Không phải là tam giác đều hay tam giác cân
2 câu trả lời
var a,b,c:longint;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
write('Nhap c: '); readln(c);
if (a=b) and (b=c) then write('Tam giac deu') else
if (a=b) or (a=c) or (c=b) then write('Tam giac can') else
write('Khong phai la tam giac deu hay tam giac can');
readln;
end.
program tamgiac;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
write('Nhap c: '); readln(c);
if (a=b)and(b=c) then write('Tam giac deu');
if (a=b) or (a=c) or (c=b) then write('Tam giac can') else
write('Khong phai la tam giac deu hay tam giac can');
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
