Nhập vào 3 số a,b,c có giá trị từ ( 1 ≤ a,b,c ≤ 6) In ra màn hình giá trị bất kì x,y,z (1≤ x,y,z ≤ 6) và tính tổng của 3 số x,y,z
Nhập vào 2 số x và y, xuất ra màn hình giá trị z của phép chia lấy phần nguyên và giá trị t của phép chia lấy phần dư của x và y
uses crt;
var x,y:int64;
begin
clrscr;
readln(x,y);
writeln('z=',x div y);
writeln('t=',x mod y);
readln;
end.
Cho a , b , c , x , y , z là các số thực thay đổi thỏa mãn ( x + 1 ) 2 + ( y + 1 ) 2 + ( z - 2 ) 2 = 4 và a + b + c = 6 . Tính giá trị nhỏ nhất của P = ( x - a ) 2 + ( y - b ) 2 + ( z - c ) 2 . .
cho hai đơn thức (-1/3)xy2z và (-3/5)x3y6z.CMR: khi x,y,z lấy các giá trị bất kì khác 0 thì hai đơn thức trên có giá trị là hai số cùng dấu
Câu 1 viết chương trình tính giá trị biểu thức với x,y là các số nguyên dc nhập từ bàn phím. In kết quả ra màn hình Caau2 viết chương trình vào 3 số nguyên a,b,c.In ra màn hình số lớn nhất trong 3 số đó
Câu 2:
Program nii;
Uses crt;
Var a,b,c,A:integer;
Begin
Write ('nhap a');
Readln (a);
Write ('nhap b');
Readln (b);
Write ('nhap c');
Readln (c);
A:=a;
If A<b then A:=b;
If A<c then A:=c;
Write ('Ket qua',A);
Readln;
End.
Câu 1
Program ntg;
Uses crt;
Var A,x,y:integer;
Begin
Write ('nhap x');
Readln (x);
Write ('nhap y');
Readln ('y');
A:=x+y;
Write ('Ket qua',A);
Readln;
End.
Câu 2:
uses crt;
var a,b,c,max:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
write('Nhap c='); readln(c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('So lon nhat trong 3 so la: ',max);
readln;
end.
Bài 1 tìm x y biết x/y+z+1=y/x+z+1=z/x+y-2=x+y+z
Bài 2 cho a(y+z)=b(z+x)=c(x+y) với a khác b khác c và a,b,c khác 0 Cmr y-z/a(b-c)=z-x/b(c-a)=x-y/c(a-b)
Bài 3 tìm p/s dạng p/s tối giản a/b biết a/b=a+6/b+9 với a,b thuộc Z , b khác 0
Bài4cho 4 tỉ số bằng nhau a+b+c/d ; b+c+d/a ; c+d+a/a ; d+a+b/c tính giá trị của mỗi tỉ số trên
Việt chương trình nhập vào các số thực x,z,y. Tính giá trị biểu thức sau a) x²+y²+z² b) √x+y-z
Program HOC24;
var x,y,z,a,b: real;
begin
write('Nhap x: '); readln(x);
write('Nhap y: '); readln(y);
write('Nhap z: '); readln(z);
a:=x*x+y*y+z*z;
writeln('Ket qua cau a la: ',a:6:2);
b:=sqrt(x+y+z);
write('Ket qua cau b la: ',b:6:2);
readln
end.
Cho x = -6; y= 3; z= 2
Tính giá trị của các biểu thức:
a) A= /x+y-z/
b) B= /x-y+z/
c) C= /x-y-z/
a) \(A=\left|x+y-z\right|\)
\(\Rightarrow A=\left|-6+3-2\right|\)
\(\Rightarrow A=\left|-5\right|\)
\(\Rightarrow A=5\)
b) \(B=\left|-6-3+2\right|\)
\(\Rightarrow B=\left|-7\right|\)
\(\Rightarrow B=7\)
c) \(C=\left|-6-3-2\right|\)
\(\Rightarrow C=\left|-11\right|\)
\(\Rightarrow C=11\)
C1:Viết câu lệnh khai biến x có kiểu số nguyên và hằng a có giá trị bằng 5 trong ngôn ngữ lập trình Pascal. C2: Viết chương trình Pascal để: A) nhập vào 2 số nguyên x, y bất kỳ B) tính tổng 2 số đó C) in ra giá trị của tổng
Câu 2:
uses crt;
var x,y:int64;
begin
clrscr;
readln(x,y);
writeln(x+y);
readln;
end.
1
a)Tìm các phân số có mẫu bằng 20 biết rằng giá trị của lớn hơn -11/23 và nhỏ hơn 7/23
b)Tìm giá trị phân số có tử bằng 4 biết giá trị của nó nhỏ hơn -5/12 và lớn hơn và lớn hơn -5/11
2.So sánh
a) a-1/a và b+1/b (a,b thuộc Z; a,b>0)
b)c-1/c và d+1/d (c,d thuộc Z ;c,d <0)
3.Tìm x thuộc Z để phân số sau nguyên
a) 2x+1/x+6
b) 6x+5/2x-1
4, Tìm cặp x,y thuộc Z biết
a) x+1/3=2/y+3
b) 5/x +y/4 =1/8
Giups mik nha mơn cc nhiều