program tong_am;
uses crt;
var f:text;
n,t:integer;
begin
clrscr;
Assign(f,'songuyen.txt'); reset(f);
t:=0;
while not eof(f) do
read(f,n);
if n<0 then t:=t+n;
end;
write('Tong cac so am la: ',t);
close(f); readln;
end.
var f1 : text; i, s : integer;
s := 0;
assign(f1, 'songuyen.txt'); reset(f1);
while not eof(f1) do
read(f1, i);
if i < 0 then s := s + i;
write('Tong so am : ', s);
close(f1);
readln
vùng núi nào có sự phân hóa khí hậu theo ĐAI cao rõ nhất? giúp mik ik,mai thi rồi
khi lỡ làm vỡ nhiệt kế thủy ngân em nên làm gì?
Giải sự tiến hóa hình thức sinh sản hữu tính
Sự tiến hóa hình thức sinh sản hữu tính được thể hiện ở những đặc điểm nào? Tại sao nói lớp thú có hình thức sinh sản tiến hóa nhất so với các lớp động vật có xương sống khác
So sánh sinh sản của ếch đồng và chim bồ câu?:33
ke ten cac cuoc khoi nghia lon trong thoi ki bac buoc , cuoc khoi nghia nao la vi dai nhat, vi sao
Em hãy viết 1 bài văn giải thichs câu tục ngữ thương người như thể thương thân(viết ra vở) Giups mk với
He (not go)__ out last night, he (stay)__ at home
để đưa 1 vật nặng có khối lượng 5 kg trực tiếp lên cao theo phương thẳng đứng thì lực cần thiết phải tác dung vật bằng bao nhiêu?
Chạy bền có mấy kiểu xuất phát?
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
