vt chương trình gtri của biêu rthuwcs sau vs n<=n<=2014
s=y1/(y1+b1)+y2/(y2+b2)+y3/(y3+b3)......+y/(yn+bn)
bt y1,y2,...yn là số nguyên tốc đầu tiên nhỏ hơn hoặc = n .
bt b1=y1-1+y1+1 , b2=y1-1+y1+1,... bn=yn-1+yn+1
Giúp Tui với ạ(đang cần gấp)!!!! Cho mô tả thuật toán sau: Bước 1. S<--0;n<--0; bước2. Nếu n>4 thì chuyển đến bước 4. Bước3. N<--n+1;S<--S+n;quay lại bước2. Bước 4.thông báo gtri S. a)tính gtri S,n. b) vt chương trình (sử dụng vòng lặp For...to...do)
a: n=10
b: uses crt;
var i,s,n:integer;
begin
clrscr;
s:=0;
for i:=1 to 4 do s:=s+i;
write(s);
readln;
end.
Vt chương trình nhập dãy n số và in ra tổng các số chẵn, tổng các số
Giúp mình vs mai mình thi r
program tongchan;
uses crt;
var i,n,s:integer;
a:array[1..50] of integer;
Begin
Write('n=');readln(n);
for i:=1 to n do
Write('a[,'i',]=');readln(a[i]);
s:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then s:=s+a[i];
if s=0 then write('Trong mang ko co so chan') else write('Tong cac so chan la:,s');
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,t,t1:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
t:=t+a[i];
t1:=0;
for i:=1 to n do
if a[i] mod 2=0 then t1:=t1+a[i];
writeln('Tong cac so la: ',t);
writeln('Tong cac so chan la: ',t1);
readln;
end.
mô tả thuật toán và vt chương trình tính tiền điện cho 1 hộ gđ vs mức giá như sau nếu dùng ít hơn 100kw vs giá 1200đ nếu từ 100kw trở lên thì moi chu gia 2000đ giúp mk vs
* Mô tả thuật toán:
- Nhập a;
- Nếu a<100 then với giá 1200đ ngược lại với giá 2000đ;
- In kết quả ra màn hình và kết thúc.
* Viết chương trình:
program Tien_dien;
uese crt;
var a,S:integer;
begin
clrscr;
write('Hay nhap KW tiêu thụ');readln(a);
if a<100 then S:=100*1200 else S:=100*2000;
writeln('So tien ho gia dinh can tra:',S);
readln
end.
(mk hk chắc nha bạn mk chỉ pk nhiêu đây thôi)
vt chương trình nhập kết quả của một số n vs các số trog khoảng từ m đến k ra màn hình(vs m,n,k nhập từ bàn phím)
Vt chương trình tìm các số có ba chữ số sao cho số đó bằng n lần tổng các chữ số của nó.(n nhập từ bàn phím)
uses crt;
var x,y,z,n : integer;
begin clrscr;
write('Nhap n:'); readln(n);
for x:=1 to 9 do
for y:=0 to 9 do
for z:=0 to 9 do
if n*(x+y+z) = x*100+y*10+z then
write('So thoa man de la :', x,y,z, ' ');
readln
end.
CMR các bt sau có gtri dương vs mọi gtri của x:
H= 4x mũ2 +4x +2
H========(2x)2+2.2x+1+12+1=(2x+1)2+1>0 hay H luôn là số dương.
\(H=4x^2+4x+2\)
\(H=4x^2+4x+1+1\)
\(H=\left(2x+1\right)^2+1\)
Vậy biểu thức trên luôn dương với mọi x.
Tinh gtri cac biêu thuc sau:
A, x^2-y^2 tai x =7 ,y=13
B, x^3-3y^2+3x-1 tai x =101
C, x^3+9x^2+27x+27 tai x=97
a),x2-y2
=(x-y)(x+y)
Thay x=7; y=13 ta có:
A=(7-13)(7+13)=(-6)*20=-120
b, đề đúng là thế này
x3-3x2+3x-1
=x3-3*x2*(-1)+3*x*(-1)2+(-1)3
=(x-1)3.Thay x=101 ta có:
B=(101-1)3=1003=1 000 000
c) x3+9x2+27x+27
=x3+3*x2*3+3*x*32+33
=(x+3)3.Thay x=97 ta có:
C=(97+3)3=1003=1 000 000