Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Бодя386
04.02.2023 07:47 •
Информатика
Чему будет равно значение переменной c в результате выполнения фрагмента программы 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.
Показать ответ
Ответ:
kolap2230
02.10.2020 08:38
Var a,b,c:integer;
begin
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;
writeln(c);
end.
Вариант ответа: 4
0,0
(0 оценок)
Популярные вопросы: Информатика
gfjew56df
27.10.2022 18:30
Репетиционный экзамен в спб 9 потоков по 100 человек в каждом. каждому из них выделяют специальный код, состоящий из номера потока и номера в потоке. при кодировании...
diman129
06.11.2021 11:14
Какой алгоритм можно назвать линейнем? пример...
mimikatja12
21.04.2023 06:03
4*343^5+6*49^8-50 информатика егэ 16 ....
elyaminaewap06uze
11.05.2021 14:04
50 1)запишите код данной bmp-картинки (код цвета дан в bgr), учитывая перенос строки, в 16сс: ff0f99 2)переведите этот код в 2сс: 3)сколько бит информации он занимает?...
lolmrminilotr
16.05.2021 07:55
Массив вводится в области описания const, вывести массив в строку его минимальный элемент и номер минимального элемента....
Наталья162345
16.02.2022 07:50
вас В одній із вивчених поезій Леся Українка використала образ античного героя : * АЗевса БПрометея ВСізіфа ГАріадни 2 «Брязне клинок об залізо кайданів,Піде луна...
danilpasynkov1
21.10.2020 14:08
К 500 г раствора купрум(II) сульфата добавили избыток раствора щелочи. Осадок выделили фильтрованием и прожарили. Масса полученного сухого вещества составила 32 г....
eledzheev
15.05.2022 10:37
Правельно розвяжете получите 200б(достаточно правельная буква)...
Polina4645
15.05.2022 10:37
Определите количество частей в каждом предложении и вид связи между ними? 1)Тот, кто правильно указывает на мои ошибки, - мой учитель ; тот, кто правильно отмечает...
AraEv
27.02.2023 07:01
3)Спишіть, поставте розділові знаки, де потрібно , підкресльть відокремлені означення , якщо вони є .1.Фільм “Земля” визнано як шедевр світового кіно.2.Холодний сніг...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
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;
writeln(c);
end.
Вариант ответа: 4