В следующем фрагменте k и S -переменные целого типа: Readln(k); S:=0; While K>0 Do Begin S:=S+k mod 10; k:= k div 10; End; Writeln(S); Какая решается задача? Запрограммируйте решение этой же задачи с использованием цикла с постусловием.
Ответы:
10-02-2014 14:16
Идет вычисление суммы цифр числа. beginreadln(k);s:=0;repeats:= s + k mod 10; k:= k div 10;until (k<=0);writeln(s);end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «В следующем фрагменте k и S -переменные целого типа: Readln(k); S:=0; While K>0 Do Begin S:=S+k mod 10; k:= k div 10; End; Writeln(S); Какая решается задача? Запрограммируйте решение этой же задачи с использованием цикла с постусловием.» от пользователя Lera Popova в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!