Viết chương trình tính tổng của các sống chẵn từ 1–>N vs N là số nguyên đc nhập từ bàn phím (‘làm theo cách while do nha)
Giúp mình vs
Viết chương trình tính tổng của các sống chẵn từ 1–>N vs N là số nguyên đc nhập từ bàn phím (‘làm theo cách while do nha) Giúp mình vs
By Maya
program tong_chan;
uses crt;
var n,i,t:integer;
begin
clrscr;
write(‘Nhap so nguyen N: ‘); readln(n);
t:=0; i:=2;
while i<=n do
begin
t:=t+i;
i:=i+2;
end;
write(‘Tong cac so chan tu 1 den ‘,n,’ la: ‘,t);
readln;
end.
uses crt;
var i,n,t:integer;
begin
clrscr;
readln(n);
i:=2;t:=0;
while i<=n do
begin
t:=t+i;
i:=i+2;
end;
writeln(t);
readln;
end.