Question

С клавиатуры вводится четырехзначное число найдите сумму цифр в этом числе кратных трем

Answer 1

Program z1;var N,A,B,C,D:integer;beginreadln(N);A:=N div 1000;B:=(N div 100) - (N div 1000)*10;C:=(N div 10)- (N div 100)*10;D:=(N mod 10);n:=0;if (A mod 3)=0 then N:=N+A;if (B mod 3)=0 then N:=N+B;if (C mod 3)=0 then N:=N+C;if (D mod 3)=0 then N:=N+D;writeln(N); end.

Answer 2

Для того чтобы найти сумму цифр в четырехзначном числе, кратных трем, нужно сначала ввести четырехзначное число с клавиатуры. После этого нужно проверить каждую цифру числа на кратность трем и если цифра кратна трем, то добавить ее к сумме. Например, если введенное число 1234, то сумма цифр кратных трем будет равна 3 (так как только цифра 3 кратна трем).

Если введенное число 1234, то сумма цифр кратных трем будет равна 3 (так как только цифра 3 кратна трем).