K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

24 tháng 2 2018

Đáp án đúng : C

11 tháng 12 2018

Đáp án đúng : C

30 tháng 4 2017

Đáp án đúng : A

13 tháng 11 2018

Đáp án đúng : B

19 tháng 9 2017

Đáp án đúng : D

7 tháng 12 2018

Đáp án đúng : A

15 tháng 5 2019

Đáp án đúng : D

26 tháng 10 2018

Đáp án đúng : D

25 tháng 1 2022

ko hiểu

quá lô zích

123:được cho 234

25 tháng 1 2022

phèn wá

10 tháng 2 2022

Tk:

undefined

uses crt;

var st:string;

i,d,t,x,y:integer;

begin

clrscr;

readln(st);

d:=length(st);

t:=0;

for i:=1 to d do 

  if (st[i] in ['0'..'9'])  then

begin

val(st[i],x,y);

t:=t+x;

end;

writeln(t);

readln;

end.