: Viết chương trình tính tổng số nguyên từ 1-n, n là số nguyên nhập từ bàn phím. Sử dụng vòng lặp while… do
giúp mik nha

Question

: Viết chương trình tính tổng số nguyên từ 1-n, n là số nguyên nhập từ bàn phím. Sử dụng vòng lặp while… do   giúp mik nha

quynhnghi · Answer

1.Program tinhtong;   var: i,s:=longint;   Begin   i:=-1;   While i<n do   Begin   i:=i+2;   S:=S+i;   End;   readln;

khanhchau · Answer

progam tinhtong;

uses crt;

var n,i:integer;

s:longint;

begin

clrscr;

write(‘Nhap n: ‘); readln(n);

s:=0; i:=1;

while i<=n-1 do

begin

s:=s+i;

i:=i+1;

end;

write(‘Tong cac so tu 1 den ‘,n-1,’ la: ‘,s);

readln

end.

0 bình luận về “: Viết chương trình tính tổng số nguyên từ 1-n, n là số nguyên nhập từ bàn phím. Sử dụng vòng lặp while… do giúp mik nha”