Bài 8. Lặp với số lần chưa biết trước

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Mỹ Trâm Nguyễn Thị

1.sử dụng câu lệnh lặp với số lần chưa biết trước viết chương trình tổng và tích của 10 số tự nhiên đầu tiên
2.sử dụng câu lệnh lặp với số lần biết trước viết công thức in ra màn hình dãy số tự nhiên từ 1 đến 10

Nguyễn Lê Phước Thịnh
26 tháng 5 2020 lúc 21:38

1:

uses crt;

var i,t:integer;

s:real;

begin

clrscr;

i:=0; t:=0; s:=1;

while i<=10 do

begin

i:=i+1;

t:=t+i;

s:=s*i;

end;

writeln('Tong cua 10 so tu nhien dau tien la: ',t);

writeln('Tich cua 10 so tu nhien dau tien la: ',s:0:0);

readln;

end.

2:

uses crt;

var i:byte;

begin

clrscr;

for i:=1 to 10 do

write(i:4);

readln;

end.


Các câu hỏi tương tự
Huỳnh Hoài Nguyên
Xem chi tiết
Thảo Vânn
Xem chi tiết
Lê Nguyễn Thanh Quân
Xem chi tiết
Nguyễn Ngọc Mai
Xem chi tiết
Hồ Duy
Xem chi tiết
Tâm Như
Xem chi tiết
P-H-P
Xem chi tiết
Trần Thị Mai Ngọc
Xem chi tiết
Ánh sao
Xem chi tiết