Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Quoc Anhh

Mọi người giúp e câu3,4,6 được ko ạ e đang cần gấp huhuuu Câu3: Viết chương trình xác định số ngày của một năm n Câu4: Viết chương trình nhập vào độ dài của ba đoạn thẳng cho biết có thể tạo thành một tam giác từ độ dài của ba đoạn thẳng vừa nhập hay không Câu6: tìm và in ra mọi ước của số nguyên dương n nhập từ bàn phím

Bao112233
17 tháng 12 2022 lúc 21:11

Cau 3:

var n:integer;
begin
    read(n);
    if n mod 4=0 then write('Nam ',n,' co 366 ngay')
    else write('Nam ',n,' co 365 ngay');
end.

Cau 4:

var a,b,c:integer;
begin
    read(a);
    read(b);
    read(c);
    if (a+b>c) and (a+c>b) and (b+c>a) then write('Co the tao thanh mot tam giac')
    else write('Khong the tao thanh mot tam giac');
    readln;
end.

Cau 6:

var n,i:integer;
begin
    read(n);
    for i:=1 to n do 
    if n mod i=0 then write(i,' ');
    readln;
end.


Các câu hỏi tương tự
Nhung Hoàng
Xem chi tiết
Trần Văn Lượng
Xem chi tiết
Nguyễn tiên
Xem chi tiết
Phương Thảo
Xem chi tiết
lamgi hoi
Xem chi tiết
HIển Long Đặng Hồ
Xem chi tiết
Huyền Diệu Nguyễn
Xem chi tiết
Hằng Trương thị thu
Xem chi tiết
Nguyễn Quang Kiệt
Xem chi tiết