Giải giúp mình với ngày mai mình kiểm tra rồi : Bài 1 viết chương trình tính tổng các số tự nhiên chẵn từ 1 đến n Bài 2 viết chương trình tính tích (n) của các số tự nhiên từ 1 đến n bằng vòng lặp while Bài 3 viết chương trình tính tổng các số từ 35 đến 77 bằng vòng lặp while

hoanganhluuthe

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 13 xem

1 trả lời

Thích Trả lời

madara782001

Bài 1:

program bai1;

uses crt;

var i,n:integer;

S:longint;

begin clrscr;

writeln('Nhap so n: '); readln(n);

S:=0;

for i:=1 to n do

if i mod 2=0 then S:=S+i;

write('Tong cac so tu nhien chan la: ',S);

readln;

end.

Bài 2:

program bai2;

uses crt;

var i,n,T:integer;

begin clrscr;

writeln('Nhap so n: '); readln(n);

T:=1; i:=0;

while i<=n do

begin

T:=T*i; i:=i+1;

end;

write('Tich cac so tu 1 den ',n,' la: ',T);

readln;

end.

Bài 3:

program bai2;

uses crt;

var i:integer;

S:longint;

begin clrscr;

S:=0; i:=35;

while i<=77 do

begin

S:=S*i; i:=i+1;

end;

write('Tich cac so tu 35 den 77 la: ',S);

readln;

end.

Học tốt!

Vote (0) Phản hồi (0) 2 năm trước

cong715944

#include<bits/stdc++.h>
using namespace std;
int main()
{
int n,total=0;
cin>>n;
for(int i=1;i<=n;i++){
if(i%2==0){
total+=i;
}
}
cout<<total;
//samon247
return 0;
}

#include<bits/stdc++.h>
using namespace std;
int main()
{
int n,i=1,total=1;
cin>>n;
while(i<=n){
total*=i;
i++;
}
cout<<total;
//samon247
return 0;
}

#include<bits/stdc++.h>
using namespace std;
int main()
{
int i=35,total=1;
while(i<=77){
total+=i;
i++;
}
cout<<total;
//samon247
return 0;
}

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

thực hiện mở bài đề sau (nghị luận xã hội) hãy cm rằng lời nhắc của maxim:"sách là ngọn đèn bất diệt"

Giúp mình giải hệ phương trình trong ảnh với

cho Tam giac ABC vuong tai A co duong phan giac BD, qua D ke duong thang vuong goc voi BC tai Etren tia doi cua tia AB lay diem F sao cho AF=EC.cm E,D,F thang hang cuu em voi

Mong mọi người tả nhanh giúp mk (Đừng lấy mạng nhoa)

Câu 9 Cho Δ ABC cân tại A.Lấy điểm D ∈AB,điểm E thuộc cạnh ÁC sao cho AD=AE.Gọi K là giao điểm của BE và CD.Chứng minh a.BE=CD B. ΔKBD= ΔKCE C.AK là tia phân giác của Â GIÚP MÌNH VỚI NHÉ😅

giúp mik vs ạ -trình bày sự phát triển ngành công nghiệp ở Bắc Mĩ???/

Vật AB dạng mũi tên đặt vuông góc vs trục chính của 1 thấu kính,cách thấu kính 30cm,cho ảnh ngược chiều lớn hơn gấp 3 lần vật. a)Đây là thấu kính loại gì?Ảnh A'B' là ảnh gì?Giải thích? b)Vẽ ảnh theo tỉ lệ c)Tính tiêu cự của kính d)Nếu di chuyển vật đến gần thấu kính 1 khg 15cm,thì ra thu đc ảnh j?Giải thích?

một máy bay từ a đến b với vận tốc 850 km/giờ. Máy bay xuất phát từ A lúc 11 giờ 20 phút và tới B lúc 13 giờ 45 phút. Hãy tính quãng đường máy bay từ A đến B

nhiệt phân hoàn toàn 59,25 gam kmno4 thu được V lít khí o2. cho toàn bộ lượng o2 này tác dụng hết với cacbon nóng đỏ thì thu được 6,72 lít hỗn hợp hai khí co và co2 . thành phần phần trăm về thể tích của co và co2 lần lượt là

Mọi người ơi!! Cho mik hỏi!! Ta có : Ox trùng với cạnh Oy thì trùng có nghĩa là gì ? Mọi người trả lời hộ mik!!Học bài mới ko hiểu lắm!! Trả lời đầy đủ!!

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến