Alexanderкакое значение S будет введено в текстовое поле?var N, d, S: Integer;beginN: = 345; S:= 0Repeatd:= N mood 10;S:= S+dN:= N div 10;Until N=0Edit2. Text:= IntToStr(S);end Объяснение как нашли значение S (значение 12, но нужно знать как выполнялись подсчёты)
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
12
d = 345 mod 10 = 5
s = 0 + 5 = 5
n = 345 div 10 = 34
d = 34 mod 10 = 4
s = 5 + 4 = 9
n = 34 div 10 = 3
d = 3 mod 10 = 3
s = 9 + 3 = 12
n = 3 div 10 = 0
x div y - целое от деления x на y
x mod y - остаток от деления x на y
367
EvlampijЧтобы ответить необходимо зарегистрироваться.
