Tin học Thi HKII

[0969264339]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

1/Cho dãy số nguyên A gồm 10 phần tử. Hãy viết đoạn lệnh nhập từ bàn phím giá trị ngẫu nhiên cho dãy A
2/ Em hãy viết chương trình tính tổng N số tự nhiên đầu tiên, với N là số tự nhiên được nhập từ bàn phím .Sử dụng vòng lặp For ...to...do

 

[ngominhduclop5b@gmail.com]

1/Cho dãy số nguyên A gồm 10 phần tử. Hãy viết đoạn lệnh nhập từ bàn phím giá trị ngẫu nhiên cho dãy A
2/ Em hãy viết chương trình tính tổng N số tự nhiên đầu tiên, với N là số tự nhiên được nhập từ bàn phím .Sử dụng vòng lặp For ...to...do

Bài 2.
var n, i, S:longint;
begin

read(n);
S:=0;
for i:=1 to n do S:=S+i;
writeln(S);
readln;​

end.

 

[ngominhduclop5b@gmail.com]

Bài 2.
var n, i, S:longint;
begin

read(n);
S:=0;
for i:=1 to n do S:=S+i;
writeln(S);
readln;​

end.