Cho đoạn thẳng EF = 8cm và đường thẳng a vuông góc vs EF . Hãy chứng tỏ a là đường thẳng trung trực của EF, biết a cắt EF tại O và OE = 4cm
ngày 10/10/2020 rơi vào thứ ba .Hỏi: a)10/10/2010 rơi vào thứ mấy ? b)ngày 10/10/2021 rơi vào thứ mấy
Tìm lí lẽ, dẫn chứng về ý nghĩa của sáng tạo trong đời sống.
giúp mình 2 bài nha mình cảm ơn nhiều
vẽ về ước mơ của em thể hiện suy nghĩ, ước mơ, bày tỏ tình cảm với thầy cô bạn bè và mái trường trước thềm năm học mới Ai trl mình cho 1 lời cảm ơn và ctrl hay nhất
Giúp em với nhé mọi ng Làm chi tiết hộ em ạ Em xin cảm ơn mn
Help em pls!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Với các chữ số 0,1,2,3,4,5 ta có thể lập được bao nhiêu số chẵn mà mỗi số gồm 5 chữ số khác nhau
đọc tên các muối sau H2S ,CuCl2,NaH2Po4,K2HPo4,MgSo3
Mn giải thích chi tiết phần chương trình chính của Code này vs ,em đang cần gấp ạ Var a,b:array[1..100] of longint; n,i,j,x,y,cs:byte; Function kt(n:longint):boolean; Var i:longint; Begin If (n=0) or (n=1) then kt:=false Else Begin i:=2; While (n mod i<>0) and (i<=sqrt(n)) do Inc(i); If i>sqrt(n) then kt:=true Else kt:=false; End; End; BEGIN Assign(input,'bai3.inp'); Reset(input); Assign(output,'bai3.out'); Rewrite(output); Readln(n); x:=1; a[x]:=0; For i:=1 to n do Begin y:=0; For j:=1 to x do for cs:=0 to 9 do If kt(a[j]*10+cs) then Begin Inc(y); b[y]:=a[j]*10+cs; End; x:=y; For j:=1 to x do a[j]:=b[j]; End; Write(x); End.
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến