KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
uses crt; var N,S, i : longint; begin write(‘Hay nhap N =’); readln(n); S:=0 fori:=1 to N do S:= S+2*i-1; write(‘Tong S=’,S); readln; end. @ara boss ris
program Tinh_Tong;
var N,i,s:longint;
begin
write(‘Nhap N: =’); readln(N);
for i:=1 to 2N-1 do
s:=s+(2*i-1);
write(‘ s:= ‘,s);
readln;
end.
Cx ko chắc nữa????
uses crt;
var N,S, i : longint;
begin
write(‘Hay nhap N =’); readln(n);
S:=0
fori:=1 to N do S:= S+2*i-1;
write(‘Tong S=’,S);
readln;
end.
@ara boss ris