Задать вопрос
ИнформатикаИнформатика
30 апреля, 05:12

В следующем фрагменте k и S - переменные целого типа:

Readln (k) ;

S:=0;

While K>0 Do

Begin

S:=S+k mod 10;

k: = k div 10;

End;

Writeln (S) ;

Какая решается задача? Запрограммируйте решение этой же задачи с использованием цикла с постусловием.

+4
Ответы (1)
  1. 30 апреля, 05:43
    0
    Идет вычисление суммы цифр числа.

    begin

    readln (k) ;

    s:=0;

    repeat

    s: = 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) ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Определить значение выражения: 1) 10 div 15 2) 10 div 2 3) 10 mod 2 4) 10 mod 17 5) 123 mod 10 6) 123 div 10 7) 1 div 2 8) 123 mod 1000 9) 100 mod 27 div 3 10) 100 div 5 mod 3 11) 98725 div 1000 mod 10 12) 100 mod 5 div 3
Ответы (1)
Uses crt; var n, s, s1, s2, k:integer; begin writeln ('Введите число: ') ; readln (n) ; s:=0; s1:=0; s2:=0; while n>0 do begin inc (k) ; if k mod 2 = 0 then begin s:=s+n mod 10; n:=n div 10; end else begin s1:=s1+n mod 10; n:=n div 10; end;
Ответы (1)
Тест: Операторы целочисленной арифметики div и mod 1. Вычислите: 25 div 11 2.27 3 2 2. Вычислите: 64 div 9 1 7 6 3. Вычислите: (35 div 2) div 5 2 17 3 4. Вычислите: (78 div 5) mod 10 5 15 10 5. Вычислите: (25 mod 11) + (18 mod 7) 3 7 4 6.
Ответы (1)
1. Решите примеры 13 div 5 = 13 mod 5 = 5 div 5 = 5 mod 5 = 3 div 8 = 3 mod 8 = 10 div 6 mod 3 = 2. Определите результат выполнения следующих действий а) a:=1819; b: = (div (а, 100)) * 10 + 9 a: = mod (10*b - a),100) а = ? b = ?
Ответы (1)
Операции MOD и DIV можно выполнять только над целыми числами: a) A:=21 DIV 5=? b) A: = 2 MOD 3=? B: = 20 MOD 5=? B: = 36.0 MOD 6=? C: = 14 DIV 6.0=? C: = 81 DIV 0=? D: = 14 MOD 0=? D: = 38 DIV 6=? E: = 5 MOD 13 = ? E: = 3 DIV 2=?
Ответы (1)
Помогите с ответом
Напиши, что умеют делать животные. Прочти предложения. 1. A fish. 2. A horse. 3. A bird. 4. A chimp. 5. A dog. 6. A mouse. 7. A dolphin. 8. A kangaroo. 9. An. elephant. 10. A rabbit.
Нет ответа
Сделайте синтасический разбор предложений: Быстро растаял под лучами яркого солнца снег. Хороши летом глазастые ромашки! Идёшь в тишине, и уха коснётся трубный звук.
Нет ответа
С. Сахарнов "Летучая рыба"
Нет ответа
Объясните, почему уважение американцев к труду можно считать одной из причин подъёма экономики. 19 Век
Нет ответа
Прочитайте. определите слово по его лексическому значению неб льшой сочный плод курстарников и трав. () тот, кто учится в школе () первый месец зимы () иструмент для копания земли () хлебный злак () часть горизонта, где восходит солнце () вставьте
Нет ответа
Главная » Информатика » В следующем фрагменте k и S - переменные целого типа: Readln (k) ; S:=0; While K>0 Do Begin S:=S+k mod 10; k: = k div 10; End; Writeln (S) ; Какая решается задача? Запрограммируйте решение этой же задачи с использованием цикла с постусловием.
Регистрация Забыл пароль