Viết chương trình in ra màn hình tổng các số tự nhiên : 1+2+...+10
2 câu trả lời
Program TinhTong;
Uses crt;
Var S,i,n:Integer;
BEGIN Write( ‘ Nhap so 1:’ );
Readln( 1 )
S: = 0;
For i:=1 to 10 do
S:=S + i;
Writeln( ‘Tong = ’, S);
Readln;
END.
var i,s:integer;
begin
for i:=1 to 10 do
s:=s+1;
write('Tong tu 1 den 10 la: ',s);
readln;
en.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
