K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

26 tháng 10 2025

ai họi


28 tháng 10 2025

iarrrrrrrrrrrrrrr


28 tháng 10 2025

bayh học có kịp kh mn :((

24 tháng 9 2025

cậu có dùng máy tính ko


28 tháng 4 2021

0 GP cũng đã được danh hiệu rồi bạn nhé

28 tháng 4 2021

sao tui 5GP r mà hổng có j hết à

7 tháng 1 2019

* Thuật toán:

Bước 1: Nhập n và dãy số a1, a2…, an.

Bước 2: SUM ← 0; i ← 0.

Bước 3: Nếu ai > 0 thì SUM ← SUM + ai, ngược lại đến bước 4.

Bước 4: i ← i + 1;

Bước 5: Nếu i \(\le\) n thì quay lại bước 3.

Bước 6: Thông báo giá trị SUM. Kết thúc thuật toán.

* Chương trình: program tinhtong; uses crt; var a,n,i: integer; sum: real; begin clrscr; write('Nhap n vao'), read(n); write('nhap day A vao'), read(a1,a2,...,an); sum:=0, i:=0; if i <= n then if ai > 0 then sum:=sum+ai else i:i+1; writeln('tong cac so duong trong day la',sum:4:0) readln end. Theo mình thì ntn
7 tháng 1 2019

1GP cho bạn nào trả lời được câu này

30 tháng 4 2019

uses crt;

var n,i: integer;

A:real;

writeln('Nhap n = '); read(n);

A:=0;

for i:= 1 to n do

A:=A + 1/(i*(i+2));

writeln('A = ',A);

readln

end.

6 tháng 1 2019

Mk chỉ bt lm trên Scratch thui

6 tháng 1 2019

VAR A,n:real;

begin

write('nhap gia tri n:');readln(n);

A:=1/(1*3)+1/(2*4)+1/(3*5)+.........+1/n(n+2);

writeln('gia tri cua A la:,'A);

readln;

end.

11 tháng 10 2016

ko phải do bạn lập trình hơi chệch choạng đâu mà do nó khó đó

11 tháng 10 2016

à có vẻ hơi khó thiệt để ngĩ đã

17 tháng 1 2018

var n,i:integer;

s:real;

begin

write('n=');readln(n);

s:=0;

for i:=1 to n do

s:=s+1/(i*(i+1));

writeln(' tong la: ',s);

readln;

end.

16 tháng 1 2018

ê

0
2 tháng 5 2021

a,Thứ tự sắp xếp đúng là 9,10,1,12,11,3,4,5,6,7,8,2,13,14

b,Công dụng để tính tổng các số chẵn lớn hơn 50

2 tháng 5 2021

nhỏ nha bạn nhầm:<<