Mọi người giúp mình câu 2 với ai làm mình tích cho
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âu 1:
const fi='dulieu.dat';
fo='thaythe.out';
var f1,f2:text;
a:array[1..100]of string;
n,d,i,vt:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
n:=0;
while not eof(f1) do
begin
n:=n+1;
readln(f1,a[n]);
end;
for i:=1 to n do
begin
d:=length(a[i]);
vt:=pos('anh',a[i]);
while vt<>0 do
begin
delete(a[i],vt,3);
insert('em',a[i],vt);
vt:=pos('anh',a[i]);
end;
end;
for i:=1 to n do
writeln(f2,a[i]);
close(f1);
close(f2);
end.
Câu 2:
uses crt;
const fi='mang.inp';
fo='sapxep.out';
var f1,f2:text;
a:array[1..100]of integer;
i,n,tam,j:integer;
begin
clrscr;
assign(f1,fi); rewrite(f1);
assign(f2,fo); rewrite(f2);
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(f1,a[i]:4);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then
begin
tam:=a[i];
a[i]:=a[j];
a[j]:=tam;
end;
for i:=1 to n do
write(f2,a[i]:4);
close(f1);
close(f2);
end.
Mọi người làm ơn giúp mik với
mấy câu hỏi đăng lên mà ko ai trả lời
mình đang cần gấp làm ơn giúp mình
A= 2006 X 2008 - 20072
A = 2006 . 2008 - 2007 . 2007
A = 2006 . ( 2007 + 1 ) - 2007 . ( 2006 + 1 )
A = 2006 . 2007 + 2006 - 2007 . 2006 + 2007
A = -1
B= 2016 X 2018 - 20172
B= 2016 . 2018 - 2017 . 2017
B = 2016 . ( 2017 + 1 ) - 2017 . ( 2016 + 1 )
B = 2016 . 2017 + 2016 - 2017 . 2016 + 2017
B = -1
Tham khảo!
Mùa xuân, cây gạo gọi đến bao nhiêu là chim. Từ xa nhìn lại, cây gạo sừng sững như một tháp đèn khổng lồ. Hàng ngàn bông hoa là hàng ngàn ngọn lửa hồng. Hàng ngàn búp nõn là hàng ngàn ánh nến trong xanh. Tất cả đều lóng lánh lung linh trong nắng. Chào mào, sáo sậu, sáo đen, đàn đàn lũ lũ bay đi bay về. Chúng nó gọi nhau, trêu ghẹo nhau, trò chuyện ríu rít. Ngày hội mùa xuân đấy...
Hết mùa hoa, chim chóc cũng vãn. Cây gạo chấm dứt những ngày tưng bừng, ồn ã, lại trở về với dáng vẻ xanh mát, trầm tư. Cây đứng im cao lớn, làm tiêu cho những con cò cập bến và những đứa con về thăm quê mẹ.
Câu 2:
a. ĐKXĐ: $x\neq \pm 2; x\neq -3$
\(A=\frac{(x+3)(x-5)}{(x+2)(x+3)}-\frac{6x-4}{(x-2)(x+2)}-\frac{x(x+2)}{(x-2)(x+2)}\\ =\frac{x-5}{x+2}-\frac{6x-4}{(x-2)(x+2)}-\frac{x^2+2x}{(x-2)(x+2)}\\ =\frac{(x-5)(x-2)}{(x+2)(x-2)}-\frac{6x-4}{(x-2)(x+2)}-\frac{x^2+2x}{(x-2)(x+2)}\\ =\frac{x^2-7x+10-6x+4-x^2-2x}{(x-2)(x+2)}=\frac{-15x+14}{(x-2)(x+2)}\)
Khi $x^2-3x-4=0$
$\Leftrightarrow (x+1)(x-4)=0$
$\Leftrightarrow x=-1$ hoặc $x=4$
Nếu $x=-1$ thì:
$A=\frac{-15(-1)+14}{(-1-2)(-1+2)}=\frac{-29}{3}$
Nếu $x=4$ thì:
$A=\frac{-15.4+14}{(4-2)(4+2)}=\frac{-23}{6}$
Lần sau bạn có thể gõ đề hẳn ra để mọi người quan sát dễ hơn nhé. Đề mờ có thể một số bạn không đọc được.