Bài 6: Phép toán, biểu thức, câu lệnh gán

thien long

Bài 1 :

Viết chương trình tính biểu thức

P = 1 +22 + 32 + ... + 102

Bài 2 :

1 + 2 + 3 + ... + n ( cho đến n > 101,3 )

Nguyễn Lê Phước Thịnh
12 tháng 10 2019 lúc 22:41

bài 1:

uses crt;

var i,t,x:integer;

begin

clrscr;

t:=0;

for i:=1 to 10 do

begin

x:=sqr(i);

t:=t+x;

end;

writeln('gia tri cua bieu thuc P=1^2+2^2+3^2+4^2+5^2+...+10^2 la: ',t);

readln;

end.

Bình luận (0)
Lê Thị Hồng Vân
12 tháng 1 2019 lúc 20:32

bài 1:
P= 1+ 2^2+ 3^2 +..... +10^2

Bình luận (0)
Nguyễn Chơn Nhân
1 tháng 11 2019 lúc 19:39

bài 2 nhé:

var s,n:integer;

begin

repeat

inc(n);

s:=s+n;

until n>1013;

write('tong la ',s);

end.

Bình luận (0)
 Khách vãng lai đã xóa

Các câu hỏi tương tự
Nguyễn Cát Tường
Xem chi tiết
hang viet
Xem chi tiết
Hary Jen Li
Xem chi tiết
nguyễn thị cẩm tiên
Xem chi tiết
trần duy hiếu
Xem chi tiết
Đức Nguyễn Trung
Xem chi tiết
Ha Ha
Xem chi tiết
Trần Lan Anh
Xem chi tiết
lee min hoo
Xem chi tiết