Hãy viết chương trình tính S(n)=1+2+3+....+n * Pascal nhé
2 câu trả lời
Program Hotboy ;
Uses crt;
Var s,i,n : integer ;
Begin
Clrscr;
Write('nhao n'); readln(n);
For i:= 1 to n do
S:=s+i;
Writeln('S(n)=' ,S);
Readln
End.
program oken;
uses crt;
var n,s,i: longint;
begin
clrscr;
write('nhap n: '); readln(n);
for i:=1 to n do
s:=s+i;
writeln('S(n)=',s);
readln;
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
