program tongcs;
uses crt;
var n:int64;
t,d:integer;
begin
clrscr;
write('Nhap so: '); readln(n);
t:=0; d:=0;
while n>0 do
inc(d);
t:=t+n mod 10;
n:=n div 10;
end;
write('Co ',d,' chu so va tong cac chu so la: ',t);
readln
end.
uses crt;var n,i,t,k:longint;s:string;beginclrscr;readln(n);str(n,s);writeln(length(s));for i:=1 to length(s) dobeginval(s[i],k);t:=t+k;end;writeln(t);readln;end.
5 sao nha bạn:3
Cho tam giác nhọn $ABC$ với $AB<AC$ với trung tuyến $AM$. Các đường cao $BD;CE$ cắt nhau tại H. Nối $DE$ cắt $BC$ kéo dài tại $I$ a. Chứng minh $IH \bot AM$ b. Gọi $K$ là giao điểm của $IH$ và $AM$. Chứng minh $BCKH$ là tứ giác nội tiếp. c. Chứng minh: $4KM.AM=BC^2$
rút gọn B=25^5+25^7+25^9:5^11+5^13+5^15+5^17+5^17+5^19+5^21
Cho đoạn thẳng AB dài 5 cm.Điểm B nằm giữa hai điểm A và C sao cho BC = 3cm a)Tính AC b) Trên tia đối BA lấy điểm D sao cho BD = 5 cm. So sánh AB và CD
Công cha, nghĩa mẹ, ơn thầy Nghĩ sao cho thỏa những ngày gian lao Em hãy kể 1 câu chuyện về cha mẹ hoặc thầy ( cô ) giáo đã dạy em câu ca dao trên .
a) Cho x > y > 0 . CMR : x ² > y ²
hoàn thành những câu tục ngữ sau : một mặt người bằng ... cái răng cái tóc là ... đói cho sạch , ... học ăn , học ... , học ... , học ... không thầy ... thương người như thể ... ăn quả nhớ ...
cho a>0, b>0 và a.b=1. tìm giá trị nhỏ nhất của P=(a+1).(b+1)
Viết chương trình nhập mảng n phần tử kiểu nguyên và cho ra màn hình xuất hiện nhiều nhất và số lần xuất hiện
viết tiếp các câu tục ngữ sau : một mặt người bằng ... cái răng cái tóc là ... đói cho sạch , ... học ăn , học ... , học ... , học ... không thầy ... thương người như thể ... ăn quả nhớ ... giúp em vs T^T
Câu 4 thoi ạ, mng giúp gấp zới, lm đúng nha, cần gấp lắm, bài thi tin của mk á:((
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến