uses crt;
var i,n:integer;
s:real;
begin
clrscr;
readln(n);
s:=0;
for i:=1 to n do
s:=s+(i/(i*sqr(i+5)));
writeln(s:4:2);
readln;
end.
viết chương trình in ra các số lẻ trong 1000 số tự nhiên daaffu tiên và tính tổng các số lẻ đó
mọi người giúp mình vs ạ , mai mình ktra r , thankkkk
Bài 1: Viết chương trình tính tổng các số chẵn từ 10 đến 50?
Bài 2: Viết chương trình giải bài toán sau: Tính tổng A ( n là số tự nhiên được nhập từ bàn phím)
A= 1.3 + 2.4 + 3.5 +...+ n(n+2).
Giúp mình với nhanh nhanh nha.
viết chương trình nhập n số nguyên từ bàn phím , nhập giá trị cho từng phần tử từ 1 đến N, đếm các số chẵn và tính tổng các số lẻ, hiện kết quả ra màn hình Giúp mik với ạ
Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng số nguyên dương n ( Với n được nhập).
Yêu cầu nhập lại nếu n<=0
ai trả lời giúp mình được ko cảm ơn
Viết chương trình nhập dữ liệu là ma trận đối xứng vào mảng hai chiều. Nhờ mn giúp mik vs ạ cảm ơn mn rất nhiều 😆😆
Cho bàu toán sau: viết chương trình tính tổng T=1+2+...+120 hãy sử dụng vòng lặp while do viết chương trình tính tổng bằng T (Giúp t vs mn ơi t cần gấp
Viết chương trình dãy số, in dãy số đó ra màn hình. Giúp mình với ạ
1.Em hãy viết chương trình tính tích các số từ 5 đến 50.
giúp mik với
Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang cần gấp rất gấp luôn
Viết chương trình tính tổng sau đây, giúp mình với ạ, mik cảm ưn, yêu mọi ngườiii