uses crt;

var i,n,s:integer;

begin

clrscr;

readln(n);

s:=1;

for i:=1 to n do

if i mod 2=1 then s:=s*i;

write(s);

readln;

end.

Ta thấy 60 gấp 30 là 2 lần

mà 4 thì gấp 2 là 2 lần nên 60x2=30x4

mà A:4

    B:8

=>A>B

b lon hon vi khi ta lay 30 nhan2 ra 60 va con nhan them 2 nua la ra 120 nhung sau khi cong het lai thi a chia  cho 4 con b chia cho8 nen suy ra a lon hon b

Chj có thê ấn vào phân tìm kiếm đê có đáp án ah

#lâurôi

====ZU====

@EMĐÂY

Vì tích trên có các số: {5;15;25;35;45;55}

Mà tích trên là tích các số lẻ => tích trên có tận cùng là số 5       ( vì mọi  số có tận cùng = 5 nhân cho mọi số lẻ vẫn có tận cùng = 5)

5

Mấy đại ca làm ơn tick giúp em 8 cái tick em đang rất cần

ban k cho minh 100 cai minh dam bao lam dung dap an la 5 chac

kb với mình nhé

program C1;

uses crt;

Var A:array[1..100] of Integer ; 

      Tc,  Tl : Integer ; 

      n,  i: Btybe ; 

begin

    clrscr ;

    Write( ' nhap n: ' ) ; Readln(n) ;

    For  i:=1 to n do

    begin

        Write ( ' A[ ' ,i, '] = ' ) ; Readln (A[i]) ; 

   end ;

   Tc: = 0 ;   Tl: = 0 ; 

   For i: = 1 to n do

       If  A[i] mod 2=0  then Tc:=Tc+A[i]

         else Tl:= Tl + A[i] ; 

  Writeln ( ' Tong so chan : ' ; Tc) ; 

  Writeln ( ' Tong so le : ' , Tl ) ;

  readln ; 

end.

program b1;
uses crt;
var i,n: integer; a:array[1..100] of integer; p:longint;
begin
clrscr;
write('Nhap vao mot day so nguyen:'); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
p:=1;
for i:=1 to n do if a[i] mod 2<>0 then p:=p*a[i];
write('Tich cac so le=',p);
readln;
end.
Tham khảo!

là 5 vì trong dãy số trên có số 5 mà 5 nhân với bất kì số nào cũng có tân cung băng 5 ngoại trừ số 0 mà dãy số trên không có số 0 thì chắc chắn tận cùng của day số trên là bằng 5