K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
NL
Nguyễn Lê Phước Thịnh
CTVHS
5 tháng 5 2021
uses crt;
var s,n:integer;
begin
clrscr;
s:=0;
n:=0;
while s<=50 do
begin
n:=n+1;
s:=s+n;
end;
writeln(n);
writeln(s);
readln;
end.
DH
1
30 tháng 12 2017
Câu hoàn chỉnh là :
Năm ngoái, bố mẹ cho chúng em đi nghỉ hè tại Đà Lạt.
DH
1
14 tháng 7 2019
Câu hoàn chỉnh là:
Anh thợ điện lả đi vì thời tiết nắng nóng.
DH
1
DH
1
30 tháng 4 2017
Câu hoàn chỉnh là:
Cây cổ thụ gãy ngang vì gió bão quá lớn.
DH
1
28 tháng 1 2017
Câu hoàn chỉnh là:
Chúng em động viên các bác thương binh bằng lời ca, tiếng hát.
DH
1
DH
2
DH
1
Thứ tự sắp xếp
12. End.
8. End;
11. Readln;
2. Begin
7. Readln(f,i);
9. Close(f);
1. Var f:text; i: byte;
10. writeln(i);
3. Assign(f,'D:/so.txt');
4. Reset(f);
5. While not(eof(f)) Do
6. Begin