Var
a,i,k:integer;
begin
readln(a);
while a<>0 do begin
if a mod 2=0 then
k:=k+1;
a:=a div 2;
end;
writeln(k);
<span>end.</span>
Жил был Билл Гейтс, и основал он компанию Microsoft, в которой родилась первая операционная графическая система MS-DOS, жалкие людишки наконец смогли по нормальному пользоваться ПК, операционная система стала сама помогать людям, спрашивать их о том, какие действия нужно совершить. После вышел Windows 95, NT, 2000, XP,7,8. И людям больше нечего было делать, только в игрушки играть, но вы! Да, да вы! Моя учительница информатики не даете мне насладиться этим чудом в полной мере. Будьте вы прокляты со своим тупым заданием. Сочинить сказку про WordPad, это просто идиотизм.
Начнем. Создали в Microsoft текстовый редактор WordPad, и людишки смогли писать на экранчиках мониторчиков. И все счастливы. Конец.
Ответ:
Программа запускалась в PascalABC.NET
Объяснение:
Ну типа это WWW это просто обзначает что ты на находишь в глобальной паутине
С++
_________
Пользователь введёт 2 5
программа найдёт 5 и отнимет 5 от 2 получится 3
__
int x,y;
cout<<"->";
cin>>x>>y;
if (x>=y)
{
x-=y;
cout<<x<<endl;
}
if (y>=x)
{
y-=x;
cout<<y<<endl;
}