Đồ Gỗ Lai Hoa
Hỏi từ APP VIETJACK
Viết chương trình tính tổng các số tự nhiên lẻ trong n số tự nhiên đầu tiên . N được nhập từ bạn phím . Viết thuật toán
Quảng cáo
1 câu trả lời 2894
Var i ,n : integer;
S ,T : real;
Begin
write ('n=') ; read (n) ;
S:= 0;
T:= 1;
For i:= 1 to n do
S:= S + i;
T:= T * i
Writeln (' Tong cua ' ,n,' so dau tien la' , S );
Writeln (' Tich cua ' ,n,' so dau tien la' , T );
Readln;
End.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45547
-
Hỏi từ APP VIETJACK28471
-
Đã trả lời bởi chuyên gia
27084
Gửi báo cáo thành công!
