Предмет: Информатика,
автор: olga7625
Var s,k: integer;
Begin
s := 3;
for k:= 2 to 6 do
S:= 5 + 5;
writeln(s);
End.
Помоги мне пожалуйста
k00dj:
Нужно переделать?
или решить по S ?
Решить
S:= 5 + 5; - тут не ошибка?
S:=s+5;
алгоритм в любом случае выведет S=5+5, т е 10. Так как S не накапливается.
с решением?
Ну нужно вообще-то ответ
Только
Ответы
Автор ответа:
1
Ответ:
S= 28
Объяснение:
Цикл идёт от 2 до 6. Следовательно:
- 2: S=3+5=8
- 3: S=8+5=13
- 4: S=13+5=18
- 5: S=18+5=23
- 6: S=23+5=28
(6 включительно в этом цикле)
X:=537;
S:=0;
while x>0 do begin
S:=s+x mod 10;
x:=x div 10;
end;
writeln(s);
Помоги срочно надо
S:=0;
while x>0 do begin
S:=s+x mod 10;
x:=x div 10;
end;
writeln(s);
Помоги срочно надо
Только ответ
Без решения
Получится 14?
Ещё нужно? Не увидел этого
S:=s+x mod 10; - в этой строчке скобочки есть? mod 10 - это к x или (s+x)
Похожие вопросы
Предмет: Русский язык,
автор: мари20040725
Предмет: Русский язык,
автор: Rysuk
Предмет: Қазақ тiлi,
автор: Aizhankudaibergenova
Предмет: Обществознание,
автор: sofya8798