Ну если код программы такой
var s,n:integer;
begin
s:=0;
for n:=6 downto 3 do
s:=s+1;
writeln(s);
<span>end.
то s=4
это если я правильно код с фото понял</span>
<em><u>Код на Паскале:</u></em>
Program proba;
Uses crt;
Var n,s:integer;
Begin
writeln('введите натуральное число');
Readln(n);
s:=0;
repeat s:=s+n mod 10;
n:=n div 10;until n=0;
writeln('сумма цифр ',s);
<span>end.
<em><u>P.S. Программа вычисляет не только трехзначные числа ;)</u></em></span>
142(5) = 1*5^2+4*5+2 = 25+20+2 = 47(10)
22(5) = 2*5+2 = 10+2 = 12(10)
21(3) = 2*3+1 = 6+1 = 7(10)
47-12+7 = 42(10)
Привет, как настроение? Меня зовут Мария, мне 18 лет. Хочу пообщаться с парнем.
Если тебе это интересно, найди меня тут - onetimesex.com
Мой никнейм - MoonaMod