program oken;uses crt;var n,i,t:longint;begin clrscr; write('nhap so n: '); readln(n); for i:=1 to n do if i mod 2=1 then t:=t+i; writeln('Tong cac so le tu 1 den ',n,': ',t); readln;end.
Do đề bạn là số lẻ(1,3,5...) nên cách làm như sau :
Var n: integer;.
s: longint;
BEGIN
repeat
write( 'Nhap n: '); readln(n);
until (n>=0)
; s:=0;
for i:=1 to n do if i mod 2 >< 0 then write(i:3);
s:=s+i; write('Tong cac so tu 1 toi ', n,' =', s); readln
Học tốt!
Chúc bn học tốt!
Tìm m để đường thẳng y=mx+1 vày=2x-1 cắt nhau tại một điểm nằm trên đường phân giác của góc phần tư thứ hai trong mặt phẳng toạ độ Oxy?
1.Nêu giá trị của hạt trần 2.Chứng minh sự đa dạng của thực vật hạt kín
câu1: Cấu tạo và chức năng của da? câu 2: cấu tạo hệ bài tiết nước tiểu ? câu 3: cấu tạo của mắt? câu 4: cấu tạo của tai? câu 5: phân biệt phản xạ có điều kiện - phản xạ ko điều kiện? câu 6: sự hình thành và ức chế phản xạ có điều kiện ? BÀI KIỂM TRA 45'
bài 2 : ( > , < , = ) : 300 cm3 ........ 3 dm3 0,7 dm3 .......... 700 cm3 698 dm3 ........... 0,0698 m3 0,01 m3 .............. 1/99 m3
Giải thích vì sao: a, cung cấp thức ăn cho vật nuôi b, chế biến thức ăn cho vật nuôi c, Dự trữ thức ăn cho vật nuôi
Nhờ trả lời câu hỏi này để mkoon nhé mai mình kiểm tra rồi
Khi nhắc tới kẻ đã “cõng rắn cắn gà nhà” là nhắc tới ai? A. Nguyễn Ánh. B . Lê Chiêu Thống. C. Tôn Sĩ Nghị. D. Sầm Ghi Đống.
so sánh 5/7 và 7/15 (không quy đồng mẫu số hay tử số)
Viết đoạn văn chứng minh hút thuốc lá là có hại cho sức khỏe (ko chép mạng nhé)
Tính khối lượng của SO3 để khi cho vào 200g H2SO4 10% tạo ra H2SO4 20%h khối lượng của SO3 để khi cho vào 200g H2SO4 10% tạo ra H2SO4 20%
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
