NJ
1
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.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
TH
3 tháng 10 2019
program tinh_gia_tri_bieu_thuc;
uses crt;
var n,j:integer;
R:extended;
begin
clrscr;
R:=0;
write('Nhap so mu n=');readln(n);
for j:=1 to n do
R:=R+ exp(n*ln(j));
writeln('Gia tri cua R=',R:1:0);
end;
readln;
end.
ML
13 tháng 3 2019
Lời giải :
program hotrotinhoc ;
var i,n : integer ;
A: real ;
begin
write('nhap gia tri n='); readln(n);
A:=1;
for i:=1 to n do
A:=A*(1+1/(i*i));
write('Ket qua la',A);
Readln
end.
8 tháng 12 2017
tất cả các câu đều là s:=s+i hay s:=s+1/sqr(i)..vân vân bạn ạ
MH
1.Viết chương trình tính: xa
2.Viết chương trình tính: S=1+2n+3n+....+nn
mong các bạn giúp đỡ.......
2
23 tháng 11 2017
Program bai1;
uses crt;
var i,x,a,kq:longint;
Begin
clrscr;
writeln('Chuong trinh tinh X^a');
write('X=');readln(x);
write('a=');readln(a);
kq:=1;
for i:=1 to a do
kq:=kq*x;
writeln(x,'^',a,'=',kq:4);
readln;
end.
23 tháng 11 2017
bài 2:
Program bai2;
uses crt;
var n,i: integer;
s: real;
begin
clrscr;
write('nhap so n ='); readln(n);
s:=0;
for i:= 1 to n do
s:=s+exp(n*ln(i));
writeln('tong =',s :4:2);
readln;
end.
L
25 tháng 10 2016
Câu 1 :
a) (a+b)*(a+b)*(d+e)
b) a*x*x+b*x*x+c*x
Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?
Câu 3:
Uses crt;
Var S,a,b:real;
Begin
clrscr;
Writeln('Nhap chieu dai a = '); Readln(a);
Writeln('Nhap chieu rong b = '); Readln(b);
S := a*b;
Write('Dien tich hinh chu nhat la ', S );
Readln;
End.
GN
25 tháng 10 2016
xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal
18 tháng 11 2017
\(x^4+x^3+x^2+2\)
\(=x^4+2x^3-x^3-2x^2+2x^2+x^2+2x-2x+2\)
\(=\left(x^4+2x^3+2x^2\right)-\left(x^3+2x^2+2x\right)+\left(x^2+2x+2\right)\)
\(=x^2\left(x^2+2x+2\right)-x\left(x^2+2x+2\right)+\left(x^2+2x+2\right)\)
\(=\left(x^2+2x+2\right)\left(x^2-x+1\right)\)
11 tháng 1 2019
program bai1;
var i,n,s,t:longint;
function tt(a:longint):longint;
var i,s:longint;
begin
s:=1;
for i:=1 to a do
s:=s*a;
tt:=s;
end;
begin
write('N= ');readln(n);
s:=0;
for i:=1 to n do
begin
t:=tt(i);
s:=s+t;
end;
write('Tong la: ',t);
readln
end.
62 = 2n
=> 62 = 36
36 = 25
Mà 62 = 2n
=> n = 5
Đây là toán à?
Umk là toán đó ?;?