Viết chương trình in ra màn hình một dãy số theo hàng ngang từ 10 đến n (đk n>10) và n được nhập từ bàn phím. 2. Viết chương trình in ra màn hình m

Viết chương trình in ra màn hình một dãy số theo hàng ngang từ 10 đến n (đk n>10) và n được
nhập từ bàn phím.
2. Viết chương trình in ra màn hình một dãy số theo hàng dọc từ 10 đến n (đk n>10) và n được nhập
từ bàn phím.

0 bình luận về “Viết chương trình in ra màn hình một dãy số theo hàng ngang từ 10 đến n (đk n>10) và n được nhập từ bàn phím. 2. Viết chương trình in ra màn hình m”

  1. Câu 1:

    Program FNG;
    Uses crt;
    Var n,i: longint;
    Begin
            Clrscr;
            Write(‘Nhap n: ‘); Readln(n);
            For i:=10 to n do Write(i,’ ‘);
            Readln
    End.

    Câu 2:

    Program FNG;
    Uses crt;
    Var n,i: longint;
    Begin
            Clrscr;
            Write(‘Nhap n: ‘); Readln(n);
            For i:=10 to n do Writeln(i,’ ‘);
            Readln
    End.

    Bình luận

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