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 4 2019

1 : có trong sgk

3:

a) b1: T←0;

B2: 1 → n ;

B3 : T:=T+1/(i*i) ;

B4: Kết thúc

26 tháng 4 2019

var a:array[1..32000] of integer;

i,n,j,tam:integer;

begin

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

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

for i:=1 to n-1 do

for j:=i+1 to n do

if a[i] > a[j] then

begin

tam:=a[i]; a[i]:=a[j]; a[j]:=tam;

end;

writeln('ket qua sap xep la:');

for i:=1 to n do write(A[i]:5);

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ĩ đã

30 tháng 10 2016

cho cái cốt thôi

s:=0;

for i:= 1 to n do

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

30 tháng 10 2016

hiêu2 quá

27 tháng 3 2021


program tinhtong;

uses crt;

var i, n, s: integer;

begin clrscr;

Write('N so tu nhien dau tien la: ');

readln(n);

s:=0;

i:=1;

while i<=n do begin

s:=s+i;

i:=i+1;

end;

writeln('Tong cac so la: ',s);

readln

end.

 

27 tháng 3 2021

giúp mình câu này luôn nhé

In ra màn hình trung bình của cấc số đã cho ở trên.
liên quan bài trên 

uses crt;

var i,n,t:integer;

begin

clrscr;

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

i:=1;

t:=0;

while i<=n do 

begin

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

i:=i+1;

end;

write(t);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

sort(a+1,a+n+1);

for (i=n; i>=1; i--) cout<<a[i]<<" ";

return 0;

}

7 tháng 3 2023

Program HOC24;

var i,n: integer;

s: real;

begin

write('Nhap n: '); readln(n);

i:=1;

while i<=n do

begin

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

i:=i+1;

end;

write('S= ',s:8:2);

readln

end.

uses crt;

var s:real;

n,i:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do

begin

s:=s+1/i;

i:=i+2;

end;

writeln('S=',s:4:2);

readln;

end.

5 tháng 3 2021

Sao s:4:2 vậy?

 

16 tháng 1 2019

Bước 1:Nhập n.Gán i=1,A:=0;

Bước 2:A=1

i(i+2)

Bước 3:i:=i+1

Bước 4:In ra A

Bước 5:Kết thúc vòng lặp.

2 tháng 1 2020

Bài Làm:

Bước 1:Nhập n.Gán i=1,A:=0;

Bước 2:A=1 và i(i+2)

Bước 3:i:=i+1

Bước 4:In ra A

Bước 5:Kết thúc vòng lặp.