Bài 2. Cho dãy số: 7,8,10,13,...Tìm giá trị của số hạng thứ N của dãy số trên. Lưu dãy số trên vào mảng và in kết quả ra màn hình. Bài 3. Viết chương trình tính tích S=1*2*3*..*N. N được nhập vào từ bàn phím.
2 câu trả lời
bài 3
uses crt;
var i,n:integer;
s:real;
begin
s:=0;readln(n);
for i:=1 to n do
s:=s+1;
write(s);
end.
Cách 1: Khai báo trực tiếp biến mảng một chiều
Var<tên biến mảng> :array[kiểu chỉ số] of <kiểu phần tử>;
Cách 2: Khai báo gián tiếp biến mảng qua kiểu mảng một chiều
Type<tên kiểu mảng>=array[kiểu chỉ số] of <kiểu phần tử>; Var<tên biến mảng>:<tên kiểu mảng>;
xin hn ạ
