Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Nguyễn Công Đạt
Xem chi tiết
Anhhh
Xem chi tiết
Hoàng Tấn Phúc
Xem chi tiết
Đỗ Trọng TÍn
Xem chi tiết
nguyen hoang long
Xem chi tiết
Nga Nguyen
8 tháng 4 2022 lúc 19:58

 

*Đề toán thi hsg lớp 8 

ko giúp đề thi và đề ktra

Nguyễn Khánh Linh
8 tháng 4 2022 lúc 20:01

thi ??

Nguyễn Lê Phước Thịnh
8 tháng 4 2022 lúc 20:02

Chọn B

Quoc Tran Anh Le
Xem chi tiết
Hà Quang Minh
21 tháng 9 2023 lúc 23:19

a) 5 số hạng đầu của dãy số là: 1; 2; 6; 24; 120.

b) \({F_1} = 1,\;{F_2} = 1,\;{F_3} = 2,\;{F_4} = 3,\;{F_5} = 5\;\).

NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
Kiều Vũ Linh
23 tháng 2 2023 lúc 11:23

Bài 1

Var s,i:integer;

tb:real;

Begin

Write('Nhap n = ');readln(n);

i:=1;

s:=0;

While i<=n do

Begin

s:=s+i;

i:=i+1;

End;

tb:=s/n;

Writeln('Tong la ',s);

Write('Trung binh la ',tb:10:2);

Readln;

End.

Kiều Vũ Linh
23 tháng 2 2023 lúc 11:27

Bài 2

Var i,n,souoc:integer;

Begin

Write('Nhap n = ');readln(n);

i:=1;

While i <= n do

Begin

i:=i + 1;

If n mod i = 0 then souoc:=souoc + 1;

End;

If souoc = 1 then write(n,' la so nguyen to')

Else write(n,' khong la so nguyen to');

Readln;

End.

nguyễn an phát
Xem chi tiết
Long Nguyễn
28 tháng 5 2021 lúc 9:01

program Phantichso;
var N, i, m, a:Longint;
    dem: Integer;
    
Begin
    write('Nhap N: ');
    readln(N);
    dem:=0;
    for i:= 1 to N div 2 do
        if (2*N-i*(i+1)) mod (2*(i+1)) = 0 then
        Begin
            a:= (2*N-i*(i+1)) div (2*(i+1));
            inc(dem);
            if (a>0) then
            Begin
                writeln('Cach thu ', dem);
                for m:=a to a+i-1 do
                    write(m, '+');
                    writeln(m+1);
            End;
        End;
End.

Messi
Xem chi tiết
Huân Trần
3 tháng 2 2016 lúc 21:37

bài 1:                                                          20

bài 2:                                                           ?