có bất buộc phải là tab ẩn danh ko hả @Huy Bình

Nguyên nhân của lỗi lặp ảnh là do các bạn sau khi ấn thay ảnh xong rồi thoát ra về trang chủ của hoc24.vn làm nó không kịp lưu thay đổi nên ảnh nó sẽ bị lặp, không bắt buộc phải là tab ẩn danh, nếu là tab thường thì sau khi ấn thay đổi xong là đăng xuất ngay rồi đăng nhập lại, trong khoảng thời gian thoát ra và đăng nhập lại máy vừa đủ thời gian để lưu thay đổi nên sẽ thay được ảnh

mọi người gíu e đi ạ, e đang cần gấp
e camon trc ạ

bài này dễ bạn hãy suy nghĩ kĩ đi đã

:))

chơi k e

Monitor là thân máy mà bạn?

Nhầm! Monitor là màn hình

*Write ('...'); có chức năng: in một dòng chữ ... ra màn hình sau đó con trỏ không xuống dòng

Writeln('...'); có chức năng: in dòng chữ .... ra màn hình sau đó con trỏ xuống dòng

Read(a); có chức năng: nhập giá trị của biến a sau đó con trỏ không xuống dòng

Readln(a); có chức năng: nhập giá trị của biến a sau đó con trỏ xuống dòng

Sự khác nhau giữa lệnh Writeln và Write là ở chỗ: sau khi in xong giá trị của các biểu thức, lệnh Writeln sẽ đưa con trỏ xuống đầu dòng dưới, còn lệnh Write thì không. Ðiều này chỉ ảnh hưởng đến lệnh in tiếp theo mà thôi

Ví dụ, bạn ghi hai dòng lệnh
read(a);
read(b);
Và khi chương trình chạy, bạn nhập hai số 20 10 thì nó sẽ là hai giá trị của biến a,b.
Nhưng khi bạn đổi read thành readln, và nhập như trên, nó sẽ dừng chương trình yêu cầu bạn nhập thêm một số nữa. Vì đối số của readln là biến a (ứng với giá trị 20 đã được đọc), nó sẽ bỏ hết phần còn lại (nghĩa là bỏ giá trị 10 ra khỏi bộ nhớ), do đó nó yêu cầu bạn nhập tiếp. Còn read thì giữ nó trong bộ nhớ, nên đến câu lệnh thứ 2 (read(b)) nó lấy giá trị này gán cho b luôn

Program viet_chuong_trinh;

uses crt;

var

i,n,k: integer;

S:real;

begin

clrscr;

writeln('Moi nhap n = '); readln(n);

S:=0;

k:=0;

for i:=1 to n do

begin

k:=k+i;

S:=S + (1/k);

end;

write(S); readln;

end.