var f: text;
T: longint;
A: integer;
Begin
Assign(f, 'abcd.xyz'); reset(f);
T:=0;
While not eof(f) do
Read(f, a);
If a mod 3 = 0 then t:=t+a;
End;
Write('tong la: ', t);
Readln
End.
var fi,fo: text; i,tong: integer;begin assign(fi,'File.inp'); reset(fi); while not eof(fi) do begin readln(fi,i); If i mod 3 = 0 then tong:=tong+i; end; close(fi); assign(fo,'File.out'); rewrite(fo); write(fo,tong);
close(fo); end.
Câu 1: Hãy nêu các bước thực hiện định dạng 1 phần của văn bản với kiểu căn lề là: căn thẳng 2 lề? Có bao nhiêu cách định dạng đoạn văn bản với kiểu căn lề là 2 kiểu căn lề? Câu 2: Em có thể định dạng một phần văn bản với cỡ chữ 13,5 được không? Nếu được thì thực hiện như thế nào? Giúp em mọi người ơi mai em thi rồi
giúp em câu 3d với câu 4 ạ em cảm ơn
Bằng phương pháp hóa hc nhận bt 2 chất khí đựng riêng biệt trong 2 lọ mất nhãn là etilen và axetilen
Giải hộ mik vs ạ mik bị mắc bài này mai phải nộp r mn giúp mik với :((
viết phương trình đường tròn đi qua 2 điểm A(0;4) và B() và có tâm I nằm trên đường thẳng Δ: x-3y-11=0
tìm 3 số nguyên dương biết tổng của 3 số đó bằng tích của 3 số đó
Dạo này có nhiều người vô lý quá, mik làm sao thì kệ mik chứ liên quan gì ko mà cứ sân si Vẽ anime tức giận **Đẹp + ko copy => 5* + ctlhn
tại sao nói hoàng hoa thám là thủ lĩnh tối cao,mưu trí,dũng cảm của phong trào nông dân yên thế
i have studied english for three years i began................
Giải và giải thik hộ mik luôn nha, camon ạ❤️
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
