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,Công thức là: =D7*C4
b,Ko.Vì nếu dùng địa chỉ tuyệt đối thì công thức vẫn tự động chạy xuống theo khi mà ta copy công thức xuông ô D8
uses crt;
var a,i:integer;
begin
clrscr;
a:=65;
while a<>0 do
begin
i:=a mod 2;
a:=a div 2;
write(i);
end;
readln;
end.
Bài 4
uses crt;
var a,b: integer;
c,s,d:real;
begin
clrscr;
readln(a,b);
if (a>0) and (b>0) then
begin
c:=sqrt(a*a+b*b);
d:=(a+b+c)/2;
s:=sqrt(d*(d-a)*(d-b)*(d-c));
writeln(c:4:2,' ',s:4:2);
end
else writeln('nhap lai');
readln
end.
Bài 5
uses crt;
var r: integer;
s,t: real;
begin
clrscr;
readln(r);
s:=r*r*3.14;
t:=2*3.14*r;
writeln(s:4:2,' ',t:4:2);
readln
end.
4:
uses crt;
var x,y,k:integer;
begin
clrscr;
readln(x,y,k);
writeln(5*x*y*k-y*(1+x)*(1+x));
readln;
end.
Chọn D