Nguyễn Unzil's Profile

​​

Ai giúp e bài này với!!

Cái này là mình làm tính tổng các số lẻ từ 1=>n nha bạn!!

Program tinh_tong_so_le;

Uses crt;

Var n,i,t:integer;

 

Begin

Clrscr;

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

t:=0;

For i:=1 to n do

  Begin

  If i mod 2<>0 then t:=t+i;

  End;

Writeln('Ket qua: ',t);

Uses crt;
Var s,kq:string;
    tong,n,c,m,i,k,j:integer;
    a:array[1..100]of integer;

Begin
  Clrscr;
  Write('Nhap so luong: ');Readln(k);
  For i:=1 to k do
    Begin
      Write('A[',i,']=');readln(a[i]);
    end;
  For i:=1 to k do
    Begin
      str(a[i],s);
      tong:=0;
      For j:=1 to length(s) do
           Begin
           val(s[j],n,c);
           tong:=tong+n;       // tìm tổng các chữ số của số vừa nhập (2+0+1+6=9)//
           n:=0;
           end;
      val(s,m,c);
      If m mod tong=0 then kq:=kq+s+' ';
    end;
  Writeln('Ket qua: ',kq);
  Readln;
End.

Bài làm của mk mà có lỗi hay bạn thắc mắc gì thì nhắn cho mk nhé

a)Ta có: AK+KI=AI

          4+KI=8

               KI=8-4

          =>KI=4(cm)

Vì AK=KI=4cm

=> K là trung điểm của AI

b)Ta có KT+IT=KI

            KT+  2=4

             KT     =4-2

=>         KT=2cm

cho tia Ot là tia phân giác của góc nhọn xOy. Trên tia Ox lấy điểm a, trên tia Oy lấy điểm B sao cho OA=OB. Trên tia Ot lấy điểm M sao cho OM>OA.

a) Chứng minh tam giác AOM=tam giác BOM

b) gọi C là giao điểm của tia AM và tia Oy. D là giao điểm của BM và Ox. Chứng minh rằng: AC=BD