Tin học Viết chuơng trình tính tổng các số nguyên liên tiếp từ n đến m vơi n, m là các số nguyên dương nhập vào từ bàn phím. (Jup mik vs ạ đang cần gấp) 23/07/2021 By Josephine Viết chuơng trình tính tổng các số nguyên liên tiếp từ n đến m vơi n, m là các số nguyên dương nhập vào từ bàn phím. (Jup mik vs ạ đang cần gấp)
program tinhtong; uses crt; var n,m,i:integer; s:longint; begin repeat write(‘Nhap n: ‘); readln(n); write(‘Nhap m: ‘); readln(m); if (n>m) then write(‘n phai nho hon hoac bang m’); until n<=m; s:=0; for i:=n to m do s:=s+i; write(‘Tong cac so tu ‘,n,’ den ‘,m,’ la: ‘,s); readln end. Trả lời
program ukm; uses crt; var S:integer; i,n,m:integer; begin clrscr; writeln(‘Nhap so nguyen duong n va m: ‘); readln(n,m); S:=0; for i:=n to m do S:=S+i; write(‘Tong la: ‘,S); readln; end. Trả lời