viết chương trình nhập vào 1 số n sau đó in ra màn hình tổng các chữ số của n và số lớn nhất trong các số đó số các chữ số của n

177545890030018

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 25 xem

1 trả lời

Thích Trả lời

chien24112002

uses crt;
var t, n, n2, max, dem, r: longint;
begin
clrscr;
t:=0;
write ('nhap n: '); readln (n);
r:=n;
n:=abs(n);
repeat
begin
n2:=n mod 10;
n:=n div 10;
t:=t+n2;
if n2 >= max then
max:=n2;
end;
until n=0;
writeln ('tong cac chu so cua n la: ',t);
writeln ('chu so lon nhat la: ',max);
while r > 0 do
begin
r:=r div 10;
dem:=dem+1;
end;
writeln ('so cac chu so cua n la: ',dem);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

tn01252232316

var t, n, n2, max, dem, r: longint;

begin

clrscr;

t:=0;

write ('nhap n: '); readln (n);

r:=n;

n:=abs(n);

repeat

begin

n2:=n mod 10;

n:=n div 10;

t:=t+n2;

if n2 >= max then

max:=n2;

end;

until n=0;

writeln ('tong cac chu so cua n la: ',t);

writeln ('chu so lon nhat la: ',max);

while r > 0 do

begin

r:=r div 10;

dem:=dem+1;

end;

writeln ('so cac chu so cua n la: ',dem);

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Giúp mik 2 câu này vs mik sẽ vote cho bn nào giúp 5 sao và tim cảm ơn mik cần để thi học kì ><

Giup mình với gần thi rồi mình cần gắp lắm

tổng của hai số là 804.tìm hai số đó,biết thêm 7 vào bên trái số bé thì được số lớn.biết số bé là số có hai chữ số giúp mình với bạn ơi cần gấp.huhuhu

6.My house is different from your house -->Your house is not................................... 7.Mai isn't as clever as her sister -->Mai's sister is.......................................... Bn nào trả lời nhanh nhất sẽ cho ctlhn ạ

Tại sao học sinh cần phải kính trọng,biết ơn thầy cô dạy mình Vì sao phải xây dựng gia đình văn hóa

truyện "bầy voi truyền thuyết" và truyện "xôi xéo" . Giúp mình viết bài đấy với hứa sẽ cho 5 sao, CTLHN, blabla,....

Cho đường tròn ( O ; R ) A là điểm ngoài của đường tròn, kẻ các tiếp tuyến AB, AC với đường tròn BC là các tiếp điểm. Gọi H là trung điểm của BC. a) c/m AHO thẳng hàng và các điểm ABOC thuộc 1 đường tròn. b) Kẻ đường kính BD của đường tròn O, kẻ CK vuông góc với BD. c/m AC.CD = CK.AO c) Tia AO cắt đường tròn O theo thứ tự tại M và N. c/m MH.MN = AM.HN d) AD cắt CK tại I. c/m AD đi qua trung điểm của CK

Câu 2 và câu 4 ạ Mn giúp em vs ạ ^Mn thi tốt^

các bn ơi cho mik hỏi thời tiết vào mùa khô ở đà nẵng như thế nào thời tiết vào mùa mưa ở đà nẵng như thế nào và chọn cho mik 2 hình ảnh về 2 mùa ạ hứa vote 5* và ctrlhn

Em hiểu như thế nào về chủ nghĩa phát xít

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến