Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
- Lựa chọn một danh sách kết quả thi đấu của các đội bóng gồm các thông tin: tổng điểm đã đạt được, số bàn thắng đã ghi, số bàn thua đã nhận.
- Chọn toàn bộ bảng sau đó trên thanh công cụ Data chọn Sort hiển thị hộp thoại
- Khi hộp thoại xuất hiện lựa chọn cột tổng số điểm đạt được, sau đó chọn lệnh Add level thêm cột hiệu số bàn thắng - thua, số bàn thắng đã ghi được, tất cả sắp xếp theo thứ tự Largest to Smallest
- Kết quả là xếp hạng đội bóng theo thứ tự thành tích tốt nhất từ trên xuống
Program ba_canh_cua_tam_giac;
uses crt;
var a,b,c: real;
BEGIN
Write('nhap do dai canh a'); Readln(a);
Write('nhap do dai canh b'); Readln(b);
Write('nhap do dai canh c'); Readln(c);
If (a<(b+c)) and (b<(c+a)) and (c<(b+a)) then write('do la do dai cua mot tam giac')
else write('do khong la do dai cua mot tam giac');
Readln;
END.
Thanks
bạn ơi viết chương trình bằng chữ hay là ở trong pascal z bạn
Đáp án D
Bạn sửa lại đề chút: ketqua := 1; While ketqua<2 do writeln(ketqua);
Vì đây là vòng lặp với số lần chưa biết trước (while..do) trong câu lệnh chỉ có in ra biến ketqua mà không có lệnh nào làm thay đổi giá trị của biến ketqua, mà điều kiện ketqua<2 (luôn luôn đúng) -> vòng lặp vô hạn -> in vô hạn số 1 trên mỗi dòng (vì dùng writeln)
1.
Viet nam
2.
Hòa
1,
Việt Nam
2,
VIE 1-0 UAE