Держи на приличном языке:
javascript:var K = parseInt(prompt().substr(0, 4)), сумма = 0; while (K > 0) { сумма += K % 10; K = K / 10 | 0; } alert(сумма);
C самого детства-я считал, что в вычислительных машинах таилось нечто особенное, непонятное многим людям. В возрасте 6 лет я точно определился-компьютеры-моя любовь. Достаточно много времени с того момента, и я уже во многом разбираюсь, но до сих пор точно не определился, на какую специализацию пойти в будущем, ведь их так много! Информационная безопастность, прикладная информатика, программирование автоматизированных систем, web программирование, специалицазии на определенных языках программирования...-у меня разбегались глаза. Впрочем я и сегодня, занимаясь письмом этого сочинения до сих пор думаю о своем "Великом выборе".
Однако одно я могу заявить точно, с настоящей гордостью-"Я люблю компьютеры и хочу связать с ними свою жизнь!"
Поделитесь своими знаниями, ответьте на вопрос:
Напишите программу, которая по введенному не более, чем четырехзначному числу k будет выдавать сумму его цифр.
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.