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.
a) [(15+20) * (15+20) - 100]/2
b) 15 + 20 - [(50+7)*(50+7)]/5
c) 15 + 20 + [(45-20)(15+20)]/3
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.
uses crt;
var n,i:integer;
s:real;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
s:=s+1/(i*(i+2));
writeln('Ket qua la: ',s:4:2);
readln;
end.
program tinhp;
uses crt;
var x,n,i: integer;
s: real;
begin
write('Nhap n:');
readln(n);
write('Nhap x:');
readln(x);
s: sqrt(x);
for i:=1 to do s:= sqrt (x+s);
write('tong s=',s:6:2);
readln;
end.
Bạn tự khai báo nhé!;
Ảnh nhỏ thì nhấn mở hình ảnh trong tab mới nha
4...
begin
repeat
write('N= '):
readln(n);
until n>0;
s:=0;
for i:=1 to n do
s:=s+1/n;
write('s= ',s);
readln
end.
uses crt;
begin clrscr;
writeln('(spr(5+2))/(3*3+1)=',(spr(5+2))/(3*3+1));
readln
end.
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.
1:
#include <bits/stdc++.h>
using namespace std;
long long a;
int main()
{
cin>>a;
if (a%2==0) cout<<"Chan";
else cout<<"Le";
return 0;
}