Viết chương trình tính tích s=1 2 3 n

  • lý thuyết
  • trắc nghiệm
  • hỏi đáp
  • bài tập sgk

Câu hỏi

Viết chương trình tính tích s=1 2 3 n

Viết chương trình tính tích: S=1.2.3....n

Giúp mình với, tks nhiều ạ!!!

Viết chương trình tính tích s=1 2 3 n

viết chương trình tính chu vi, diên tích hình vuông với cạnh a được nhập vào từ bàn phím.❤✿

   

mn giúp em với ạ T4 em thi rồi!!!

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

Viết chương trình pascal thực hiện tính toán các biểu thức sau:

a) 7.(8 + 5 -2)-30+12

b)(15+5)^2.(6+4)^3

(Mình đg cần mong mn giúp, thanks ạ)

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

Viết chương trình in ra màn hình các phép tính sau: 

a/ 16 div 3; b/ 15 mod 3; c/1.2+1.2.3+1.2.3.4. 

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

mình viết chương trình ra thì bị vầy nèbạn nào sửa giúp mình với

Đọc tiếp

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

Câu 1:Viết chương trình tính: S=2+4+6+...+n

Câu 2:Viết chương trình tính: S+1+(1/2)+(1/3)+...(1/n)

Câu 3:Viết chương trình tính trung bình cộng của n số tự nhiên bất kỳ nhập từ bàn phím.

Giúp mik với nhé các bạn, thanks nhiều ạ!

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

Viết chương trình tính tổng: S = 11+14+17+...+68 M.n giúp e vs t4 e thi r :(((

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

1.Viết chương trình tính tổng các số tự nhiên từ 100 đến 1000.

giúp mình nhé

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

1. Viết chương trình tính tổng sau:a) S = \(1+\dfrac{1}{2}+\dfrac{1}{3}+...+\dfrac{1}{n}\)b) S = \(1+\dfrac{1}{3}+\dfrac{1}{5}+...+\dfrac{1}{n}\)2. Viết chương trình nhập 2 số nguyên a và b. Tìm bội chung nhỏ nhất3. Cho một dãy số gồm N phân tử:- Tính tổng các phân tử trong dãy số- Tìm phân tử lớn nhất- In ra màn hình các số nguyên tố có trong dãy

Đọc tiếp

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n

Viết chương trình nhập từ bàn phím ba số a, b và c. In ra màn hình ba số đó.Giúp mình với ạ.

Đọc tiếp

Xem chi tiết

Viết chương trình tính tích s=1 2 3 n
Viết chương trình tính tích s=1 2 3 n

  • Mtrend News
    • Mtrend Music
    • Mtrend Thời Trang
    • Ảnh đẹp
    • Món Ngon Mỗi Ngày
    • Kiến thức máy tính
    • Kiến thức Xã Hội
    • Mtrend MMO
    • Kiến thức Moba
      • Liên Minh Huyền Thoại
      • Liên Quân Mobile
  • Phong thủy
    • Xem tử vi
    • Giải mã giấc mơ
  • Góc Review
    • Skincare
    • Thực phẩm chức năng

Home/ Môn học/Tin học/1, viết chương trình tính tích P=1.2.3 … n , vói n đc nhập từ bàn phím 2, viết chương trình nhập n số nguyên từ bàn phím và in ra giá trị trung bình

1, viết chương trình tính tích P=1.2.3 … n , vói n đc nhập từ bàn phím 2, viết chương trình nhập n số nguyên từ bàn phím và in ra giá trị trung bình

Question

1, viết chương trình tính tích P=1.2.3 … n , vói n đc nhập từ bàn phím
2, viết chương trình nhập n số nguyên từ bàn phím và in ra giá trị trung bình của các số đó. với n đc nhập từ bàn phím

in progress 0

Tin học Jasmine 4 tháng 2021-08-09T11:30:53+00:00 2021-08-09T11:30:53+00:00 2 Answers 127 views 0

Answers ( )

  1. Viết chương trình tính tích s=1 2 3 n

    Câu 1: 

    Program tinh_tich;

    Uses crt;

    Var i,n,P: longint;

    Begin

    Writeln (‘nhap n=’); 

    Readln (n);

    P:=1;

    For i:=1 to n do 

    P:=P*i;

    Writeln (‘Tich P la:’,P);

    Readln

    End.

    Câu 2:

    Program tinh_tbc;

    Uses crt;

    Var A :  array [1..150] of integer;

                   S,i,n : integer;

                   Tbc : real;

    Begin 

    Write (‘nhap n=’); 

    Readln (n);

    For i:=1 to n do

    Begin

    Write (‘nhap phan tu thu ‘,i,’=’);

    Readln (A[i]);

    end;

    S:=0;

    For i:=1 to n do 

    S:=S+A[i];

    Tbc:= S/n;

    Writeln (‘Trung binh cong cua n so nguyen la:’, Tbc:8:2);

    Readln 

    End.

  2. Viết chương trình tính tích s=1 2 3 n

    Bài 1:

    uses crt;

    Var n,tich: int64; i:longint;

    Begin

    clrscr;

    Write(‘Nhap N =’);

    Read(n);

    tich:=1;

    For i:=1 to n do

    tich:=tich*i;

    Write(‘Tich = ‘,tich);

    End.

    Bài 2:

    uses crt;

    Var a:array[1..1000000] of int64;

     n, tong:int64; i:longint; tbc: real;

    Begin

    clrscr;

    Readln(n);tong:=0;

    For i:=1 to n do

    Begin

    Read(a[i]);

    tong:=tong+a[i];

    End;

    tbc:= tong/n;

    Write(tbc:0:2);

    End. 

    Có gì thì góp ý để mình sửa nha.

Leave an answer

Jasmine

Viết chương trình tính tích s=1 2 3 n