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
program Tim_Max;
uses CRT;
var a,b,c,d,Max :integer;
Begin
clrscr;
Write('Nhap 4 so can so sanh ');
readln(a,b,c,d);
Max:=a;
If Max<b then Max:=b;
If Max<c then Max:=c;
If max<d then Max :=d;
Writeln('So lon nhat trong 4 so do la: ',Max);
readln;
End.
Tìm GTLN : =SUM(XA:YB) sau đó ấn enter,sử dụng nút điền , kéo thả chuột sang ngang để sao chép công thức.
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
a. 5x3 + 2x2 - 18x + 25 = 5*x*x*x + 2*x*x - 18*x + 25
c. \(\dfrac{2a^2+2c^2-a}{4}\)=(2*a*a+2*c*c-a)/4
d. \(\dfrac{x+y}{x-y}\)=(x+y)/(x-y)
program crtg;
uses crt;
var n,i, j: integer;
A: array[1..1000] of byte;
tb: integer;
min,max: byte;
begin
clrscr;
writeln('Nhap do dai day A: '); read(n);
writeln('Nhap cac phan tu cua day: ');
for i:=1 to n do
begin
writeln('a[',i,'] = ');
repeat
read(a[i]);
until a < 100;
end;
for i:= 1 to n do
begin
if a[i] <> 1 then
begin
j:= 2;
while (a[i] mod j <> 0) do j:=j+1;
if j = a[i] then write(a[i]',');
end;
end;
tb:=0;
for i:=1 to n do
tb:=tb+a[i];
tb:=tb/n;
writeln('Gia tri trung binh cua day tren la: ',tb);
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i] < min then min:=a[i];
if a[i] > max then max:=a[i];
end;
writeln('Gia tri lon nhat cua day la ',max);
writeln('Gia tri nho nhat cua day la ',min);
readln
end.