Giúp mình với ạ mình cần gấp Câu 1: viết chương trình con kiểm tra số nguyên a có là số chẵn hay không. Áp dụng chương trình con đó hiển thị lên màn

Giúp mình với ạ mình cần gấp
Câu 1: viết chương trình con kiểm tra số nguyên a có là số chẵn hay không. Áp dụng chương trình con đó hiển thị lên màn hìn các số chẵn trong đoạn từ m->n
Câu 2: viết chương trình con nhạp vào 3 số nguyên dương a,b,c; chương trình con tính chu vi; chương trình con tính diện tích; chương trình con tính độ cao; chương trình con tính đường trung tuyến; chương trình con tính đường phân giác

0 bình luận về “Giúp mình với ạ mình cần gấp Câu 1: viết chương trình con kiểm tra số nguyên a có là số chẵn hay không. Áp dụng chương trình con đó hiển thị lên màn”

  1. Program DN;
    Uses crt;
    Var m,n,i: longint;

    Function mod2(a: longint): boolean;
    Begin
            If a mod 2 = 0 then exit(true);
            exit(false);
    End;

    Begin
            Clrscr;
            Read(m,n);
            For i:=m to n do
                    If mod2(i) then Write(i,’ ‘);
            Readln
    End.

    Bình luận

Viết một bình luận