Nội dung bài viết

    Xem thêm

    Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n

    Vietjack.me giới thiệu bộ câu hỏi ôn tập Tin học có đáp án được biên soạn bám sát chương trình học giúp bạn ôn luyện và bổ sung kiến thức môn Tin học tốt hơn. Mời các bạn đón xem:

    1 319 03/08/2023
    Trang trước
    Chia sẻ
    Trang sau  

    Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n

    Đề bài: Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n ( Với n được nhập). Sao cho 15 số lẻ được in trên một dòng.

    Lời giải:

    Program BTH;
    Uses crt;
    var j,i,n:word;
    Begin
    Clrscr;
    Write('Nhap n ='); readln(n);
    j:= 0;
    For i:=1 to n do if i mod 2 =1 then
    Begin
    Write(i,' ');
    j:=j + 1;
    if j mod 15 = 0 then Writeln;
    end;
    readln
    end.

    Bài viết cùng lớp mới nhất

    Xem thêm
    1 319 03/08/2023
    Trang trước
    Chia sẻ
    Trang sau  

    Xem thêm các chương trình khác: