Đăng nhập để hỏi chi tiết
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
TRẢ LỜI
1) hình 1
2) hình 2
đã test
Hãy giúp mọi người biết câu trả lời này thế nào?
41 vote
Bài 1:
Var P,n, i: longint;
Begin
Write('Nhap n:'); readln(n);
P:=0;
For i:=1 to n do P:= P+ (2*i-1);
Write('P:', P);
Readln
End.
Bài 2:
Var A,i,n: longint;
Begin
Write('Nhap n:'); readln(n);
A:=0;
For i:=1 to n do A:= A+ 2*i;
Write('A:', A);
Readln
End.
Hãy giúp mọi người biết câu trả lời này thế nào?
51 vote
Cảm ơn, nhưng mình làm xong rồi😅
Bạn muốn hỏi điều gì?
Đặt câu hỏiTham Gia Group Dành Cho 2K11 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí
ll Viettel
18:59
O 74%
Xong
BÀI TẬP.docx
BÀI TẬP
Sử dụng vòng lặp For... do, viết chương trình tính tổng
sau:
1./ P= 1 +3 + 5 + 7+... + (2n + 1), với n là số tự nhiên
được nhập vào từ bàn phím;
2./ A= 1+2+4 + 6 + ... + 2n, với n là số tự nhiên
được nhập vào từ bàn phím.
Bảng tin
Bạn muốn hỏi điều gì?
Đặt câu hỏi
Cơ quan chủ quản: Công ty Cổ phần Công nghệ Giáo dục Thành Phát
Tải ứng dụng
Inbox: m.me/hoidap247online
Trụ sở: Tầng 7, Tòa Intracom, số 82 Dịch Vọng Hậu, Cầu Giấy, Hà Nội.
Giấy phép thiết lập mạng xã hội trên mạng số 331/GP-BTTTT do Bộ Thông tin và Truyền thông.
2
10
1
Cảm ơn nhiều🥰