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.

19 tháng 9 2017

a) [(15+20) * (15+20) - 100]/2

b) 15 + 20 - [(50+7)*(50+7)]/5

c) 15 + 20 + [(45-20)(15+20)]/3

19 tháng 9 2017

a) Writeln(` [(15+20)*(15+20) - 100]/ 2' , [(15+20)*(15+20) - 100]/2 ) ;

b) Writeln ('15+20 - (50+7)*(50+7)/5= ' , 15+20 - (50+7)*(50+7)/6 ) ;

c) Writeln ( ' 15 + 20 + (45-20)* (15+20)/3 = ' , 15+20 +(45-20)*(15+20)/3 );

6 tháng 1 2019

ờ nhưng tại sao kêu t tag vậy Hùng, m tag ko đc ak ?

@Nguyễn Trần Thành Đạt

6 tháng 1 2019

Tú Nguyễn B (Erik) Trương Quang Dũng hành động đi các bạn, đây là sân chơi của các bạn, cộng đồng đang chờ bạn, gia đình chờ bạn, bạn bè chờ bạn ><

4 tháng 1 2018

a) a*a+1-2=b

b) (15*15)+((16+a)*(16+a))=c

c) 1/((15+1)*(15+1))-6=b

3 tháng 1 2018

a) (1/(b+2))*(a*a+c)=5

b) (k*k)+((k+1)*(k+1)) < > (k+2)*(k+2)

c) 8*x-7>1

d) (b*b)-(4*a*c) >=0

e) (1/n)*(1/(n+i))*(1/(n+2)) <0,01

f) (a-3)*(a+5)=0

g) ((a+c)*h)/2 < > 1

h) 2*x+3 <= 25*y;

k) x >= (m+5)/(2*a);

l)3,14*(R*R) > a*a

29 tháng 12 2017

a) ((1/(b+2))*(a*a+c)=5*k*x)>=(m+5)/2*a

b)(k*k)+((k+1)*(k+1)) <>((k+2)*(k+2)) .(dấu | ) mình không hiểu lắm )

c)8*x-7>1

d) (b*b)-(4*a*c)>=0

e) (1/n)*(1/(n+1))*(1/(n+2)<0,01

f) (a-3)*(a+5)=0

g)((a+c)*h)/2<>1

h)2*x+3<=25*y

22 tháng 1 2019

var i,n:integer;

tich:real;

begin

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

tich:=1;

for i:=1 to n do tich:=tich*(1+1/(i*i));

write('ket qua la:',tich);

readln

end.

22 tháng 1 2019

thêm: write('ket qua la:',tich:2:1);

21 tháng 2 2018

program bai1;

var s,n:longint;

begin

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

s:=1;

for i:=2 to n do

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

write('s= ',s);

readln

end.

uses crt;

begin clrscr;

writeln('(spr(5+2))/(3*3+1)=',(spr(5+2))/(3*3+1));

readln

end.

8 tháng 10 2019

Program hotrotinhoc;

var s: real;

t : integer;

begin

t:=sqr(5+2);

s:=(sqr(3)+1);

s:=t/s;

write(s:2:3);

readln

end.

2 tháng 1 2018

progrỉnam bai1;

var n,i:longint;

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.

3 tháng 1 2018

1) 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.

2) var n,i:integer;

s:real;

begin

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

s:=0;

for i:=1 to n do s:=s+(1/((2*i)-1));

writeln(' Tong la: ',);

readln;

end.

20 tháng 1 2018

uses crt;

var i,n:integer; S:real;

Begin

clrscr;

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

for i:=1 to n do S:=S+1/(i*(i+2));

writeln('Tong la: ',S:3:1);

readln

End.

11 tháng 1 2018

program bai1;

var n,i:longint;s:real;

begin

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

s:=0;

for i:=1 to n do

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

writeln('Tong la ',s);

readln

end.

11 tháng 1 2018

của Trương Quang Dũng thiếu uses crt;

ko khai báo s.

có 2 dấu ngoặc liên tiếp nên chương trình sẽ bị lỗi