cho day 1;2;3;4;5;...;x tim x biet day co 1989 chu so
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:
uses crt;
var b:array[1..100]of real;
i,n:integer;
min:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('B[',i,']='); readln(b[i]);
end;
min:=b[1];
for i:=1 to n do
if min>b[i] then min:=b[i];
writeln('Gia tri nho nhat la: ',min:4:2);
readln;
end.
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,j,tam:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
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;
writeln('Day giam dan la: ');
for i:=1 to n do write(a[i]:4);
readln;
end.
chiều cao là:
20 : 2 = 10m
diện ha hình thang là:
(30+20)x10:2=250m2
chiều cao hình tam giác là:
250 : 40 x 2 = 12,5m
chiều cao là:
20 : 2 = 10m
diện ha hình thang là:
(30+20)x10:2=250m2
chiều cao hình tam giác là:
250 : 40 x 2 = 12,5m
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if i mod 2=0 then write(i:4);
writeln;
for i:=1 to n do
if i mod 2=1 then write(i:4);
readln;
end.
Số nước lọc an đổ thêm là: 1/6+1/3+1/2=1(cốc nước)
Suy ra an uống số nước lọc và nước chè bằng nhau
Tiếng Việt không dấu như ăn cơm không có canh
Người Việt đọc tưởng tiếng Tây, Tây đọc không hiểu
từ 1->9 có 9 chữ số
từ 10->99 có: (99-10+1).2=180(chữ số)
số các chữ số còn lại là: 1989-9-180=1800(chữ số)
=> x là: 1800:3+99=699
Từ 1 đến 9 có số chữ số là: 9-1+1*1=9 chữ số
Từ 10 đến 99 có số chữ số là : 99-10+1*2=180 chữ số
Số chữ số còn lại là: 1989-9-180=1800 chữ số
Vậy x là: 1800:3+( 9+90)=699