Паскаль! цикл while. начальный уровень.
найдите наибольшую степень 2, делящую данное число а.
Ботаник1111111111
3
10.08.2019 23:52
1
Другие вопросы по теме Информатика
saitovdamir20Damit
09.08.2019 01:30
maksimmaksegoroysa5l
17.12.2020 17:40
GINVIC
04.02.2022 13:44
Cennet55
04.02.2022 13:49
titan9064
04.02.2022 13:50
Инфузорияяя
10.06.2019 11:40
Polinaqqq
10.06.2019 11:40
shakmatovakseni
10.06.2019 11:40
Luna669
10.06.2019 11:40
Популярные вопросы
- Чим видризняеться головний мозок собаки вид головного мозку риби?...
2 - Кто напишит первий з большой букви Макаренко г*й тот получит 85 очков или менше...
3 - Який художній засіб використано у фразі Смерть поки що відступила ?...
2 - Порівняльна характеристика вуглеводнів сделать таблицу...
2 - Укажи вид атмосферных осадков в виде водяных капель Или струй это либо снег дождь...
1 - Рассмотрите репродукции картин русского художника Д.Г. Левицкого из серии портретов...
3 - Написати твір роздум на тему який духовний шашіль підточив родинне дерево Кулаківських...
2 - Выясните при каких значениях x производная функции f(x)=x^2-6x+7 равна нулю...
1 - Дріт завдовжки 3 м і діаметром 0,8 мм висить вертикально . Довільного кінця дроту...
2 - Вычислите значение выражения удобным...
3
Код программы:
program learning;
var a, c: Integer;
begin
c:= 0;
readln(a);
while(a mod 2 = 0)
do begin
a:= a mod 2;
c:= c+1;
end;
writeln(c);
end.