var k:integer;
begin
write ('Введите не более, чем четырехзначное число: ');
readln (k);
writeln ('Сумма цифр равна: ',k div 1000 + k div 100 mod 10 + k mod 100 div 10 + k mod 10)
end.
Держи на приличном языке:
javascript:var K = parseInt(prompt().substr(0, 4)), сумма = 0; while (K > 0) { сумма += K % 10; K = K / 10 | 0; } alert(сумма);
var k:integer;
begin
write ('Введите не более, чем четырехзначное число: ');
readln (k);
writeln ('Сумма цифр равна: ',k div 1000 + k div 100 mod 10 + k mod 100 div 10 + k mod 10)
end.
Держи на приличном языке:
javascript:var K = parseInt(prompt().substr(0, 4)), сумма = 0; while (K > 0) { сумма += K % 10; K = K / 10 | 0; } alert(сумма);