YOMEDIA
NONE

Hãy viết chương trình in ra bảng nhân 8?

C1:Hãy viết chương trình in ra bảng nhân 8

C2:Viết chương trình hiển thị thông tin về: Họ tên học sinh, lớp trường, thành phố

C3:

a)Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n với n là số tự nhiên được nhập từ bàn phím

b)Viết chương trình tính tổng S=1+2+3+4+...+n với n là số tự nhiên được nhập từ bàn phím

Theo dõi Vi phạm
ATNETWORK

Trả lời (1)

  • Cau 1:

    Var i :integer;

    Begin

    Writeln (' Bang Nhan 8 : ');

    For i:= 1 to 10 do Writeln (i , ' x ' , 8 , ' = ', j*8);

    Readln;

    end.

    Cau 2:

    Var t,l,p,s:string;

    Begin

    Writeln (' Ho ten hoc sinh : ');

    Readln (t);

    Writeln (' Lop : ');

    Readln (l);

    Writeln (' Truong : ');

    Readln (s);

    Writeln (' Thanh pho : ');

    Readln (p);

    Readln;

    end.

    Cau 3 :

    a. Var n,i:integer;

    Begin

    Write (' nhap n = ');

    Readln (n);

    For i:= 1 to n do If (i mod 2 <>0) and (i<=n ) then write (i:4);

    Readln;

    end.

    b.Var i,n,S:integer;

    Begin

    Write (' Nhap n = ');

    Readln (n);

    S:= 0;

    For i:= 1 to n do S:=S+i;

    Write (' Tong S = ',S);

    Readln;

    end.

      bởi Mạnh Long Lư 29/10/2018
    Like (0) Báo cáo sai phạm

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

 

YOMEDIA
ATNETWORK
ON