Câu trả lời được xác xắn chứa báo cáo đúng chuẩn với tin cậy, được chứng thực hoặc trả lời vì chưng các chuyên gia, cô giáo hàng đầu của Shop chúng tôi.

Bạn đang xem: Viết chương trình tính tổng


*

1.

program ct;

uses crt;

var s,i,n:integer;

begin

clrscr;

write("nhap n:=");readln(n);

s:=0;

for i:=1 lớn n vì s:=s+i;

writeln("tong la:",s);

readln

end.

2.

program ct;

uses crt;

var t,n,i:integer;

begin

clrscr;

t:=0;

for i:=1 to lớn 200 vày t:=t+i;

writeln("tong cua 200 so nguyen dau tien la:",t);

readln

over.

3.

program ct;

uses crt;

var tich,n,i:integer;

begin

clrscr;

tich:=1;

for i:=1 lớn 30 do tich:=tich*i;

writeln("tich cua 30 so nguyen dau tien la:",tich);

readln

end.

4.

program ct;

uses crt;

var i,n,a:integer;

begin

clrscr;

a:=1;

for i:=1 to a vì a:=a*i;

writeln("n:=",a);

readln

kết thúc.

Xem thêm: Tải Bài Hát Hoa Vàng Mấy Độ Khánh Ly ), Hoa Vàng Mấy Độ

5. Thiếu dữ kiện


Hãy góp phần nhiều fan biết câu trả lời này ráng nào?


star

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar
5
starstarstarstarstar
2 vote
GửiHủy


Chưa bao gồm nhómTrả lời1011

Điểm

15859

Cám ơn

495


vậy thì bản thân làm tới câu 4 thôi




Chưa bao gồm nhómTrả lời

1011

Điểm

15859

Cám ơn

495


mà cho mình hỏi bạn làm việc lớp mấy vậy


*

Chưa tất cả nhómTrả lời

874

Điểm

24096

Cám ơn

585


8.


Chưa có nhómTrả lời

0

Điểm

33

Cám ơn

0


mình cx ko bik nx á bạn tại thầy đưa đề vậy í


Chưa tất cả nhómTrả lời

0

Điểm

235

Cám ơn

0


X^n nhưng bạn


Chưa có nhómTrả lời

0

Điểm

180

Cám ơn

0


x nón n nha


Chưa tất cả nhómTrả lời

0

Điểm

40

Cám ơn

0


Giải jup câu 5 ik ạ x nón n á


Chưa tất cả nhómTrả lời

32

Điểm

320

Cám ơn

9


câu 1 gồm đúng ko


Đăng nhập nhằm hỏi chi tiết
Chưa gồm nhómTrả lời

874

Điểm

24096

Cám ơn

585


*

1)

program ct;

uses crt;

var i,n:integer;

S:longint;

begin clrscr;

writeln("Nhap so n: "); readln(n);

S:=0;

for i:=1 khổng lồ n do

S:=S+i;

writeln("Tong S la: ",S);

readln;

end.

2)

program ct;

uses crt;

var i,n:integer;

S:longint;

begin clrscr;

S:=0;

for i:=1 khổng lồ 200 do

S:=S+i;

writeln("Tong 200 so nguyen dau tien la: ",S);

readln;

over.

3)

program ct;

uses crt;

var i,n:integer;

T:longint;

begin clrscr;

T:=1;

for i:=1 lớn 30 do

T:=T*i;

writeln("Tich 30 so tu nhien dau tien la: ",S);

readln;

end.

4)

program ct;

uses crt;

var i,n:integer;

gt:longint;

begin clrscr;

gt:=1;

for i:=1 to n do

gt:=gt*i;

writeln("n!= ",gt);

readln;

over.

Học tốt!


Hãy giúp đầy đủ fan biết câu vấn đáp này chũm nào?


star

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar
5
starstarstarstarstar
1 vote

GửiHủy
Because no no noTrả lời1082

Điểm

30489

Cám ơn

1579


cau 1 teo sai ko ạ


Chưa bao gồm nhómTrả lời

6

Điểm

37

Cám ơn

1


Theo mik đúng r ák


Đăng nhập nhằm hỏi bỏ ra tiết
XEM GIẢI BÀI TẬP SGK TIN 8 - TẠI ĐÂY

Bạn mong mỏi hỏi điều gì?

Đặt câu hỏi

Sự kiện


Đua top thừa nhận đá quý mon 8/2021

Quý Khách mong mỏi hỏi điều gì?

Đặt câu hỏi

Lý vày report vi phạm?


Gửi đòi hỏi Hủy


*

Cơ quan tiền chủ quản: công ty chúng tôi Cổ phần Công nghệ Giáo dục đào tạo Thành Phát


Tải ứng dụng


*
Trụ sở: Tầng 7, Tòa đơn vị Intracom, Trần Thái Tông, Cầu Giấy, TP. hà Nội.
Giấy phxay thiết lập cấu hình social trên mạng số 331/GP-BTTTT vày Sở Thông tin với Truyền thông.