Решение: я попробую объяснить словами…
var a,b,c:integer;
begin
a:=1257;
c:=0;
while (a>0) do т.к a>0 (1257>0) начинаем решить действия
begin
if (a mod 2 <> 0) then Здесь: 1257_2=628 (остаток 1)
b:= a mod 10; Здесь: 1257_10=125 (остаток 7)
c:=c+b; Получается, мы складываем остатки и
a:=a div 10; получаем 8. Для ответа нам пригодится
end; число, составленное из остатка а и 8,
writeln(c); то есть 18.
end.
Источник: globuss24.ru
Чему будет равно значение с в результате выполнения фрагмента программы
Привет Лёва Середнячок
Чему будет равно значение переменной «С» в результате выполнения фрагмента программы
Информатика Босова 8 кл. №151 Решение задания
a:=1257; c:=0;
while a>0 do begin
if a mod 2<>0 then b:=a mod 10; c:=c+b;
a:=a div 10; end;
1) 5; 2) 13; 3) 16; 4) 18.
5 (1 оценка)
65536 8 лет назад
Светило науки — 214 ответов — 0 раз оказано помощи
В результате выполнения фрагмента программы: var s: integer; с: array [1..3] if integer;
Как быстро выучить стихотворение наизусть? Запоминание стихов является стандартным заданием во многих школах.
Как научится читать по диагонали? Скорость чтения зависит от скорости восприятия каждого отдельного слова в тексте.
Как быстро и эффективно исправить почерк? Люди часто предполагают, что каллиграфия и почерк являются синонимами, но это не так.
Как научится говорить грамотно и правильно? Общение на хорошем, уверенном и естественном русском языке является достижимой целью.
- Обратная связь
- Правила сайта
Источник: www.soloby.ru