1.ПОСТАНОВКА ЗАДАЧІ. Необхідно перевести число з десяткової системи у двійкову методом віднімання. а) від заданого числа A віднімаємо вагу i-го розряду, де i - кількість знаків числа( . б) якщо результат невід’ємний, то до шуканого результату зправа дописуємо одиницю, отримане число беремо за нове; інакше до результату дописуємо нуль, а задане число A залишаємо без змін. в) якщо номер розряду i не рівний нулю, то зменшуємо його на 1 і переходимо до п. a). 2.РОЗРОБКА СТРУКТУРИ ДАНИХ. №п(п Позначення Ім’я( Тип Призначення, опис  1 a a ціла Число в десяткові системі  2 i i ціла Кількість знаків двійкового числа  3 k k ціла Потрібна для знаходження числа в дв. системі  4 c c ціла Значення функції, вихідна  5 j j ціла Кількість чисел які потрібно перевести  6 m m Масив цілих чисел Потрібна для знаходження і   3. РОЗРОБКА АЛГОРИТМУ.

 4.РОЗРОБКА ПРОГРАМИ. program Project1; var a,i,k,c,j:integer; m:array[1..200]of integer; begin for j:=1 to 3 do begin writeln('vvedit shuslo v desatkovij sustemi'); readln(a); c:=1; writeln('v dvijkovij sustemi:'); for i:=200 downto 0 do if a-exp(i*ln( 2))>=0 then begin m[c]:=i; c:=c+1; end; for k:=m[1] downto 0 do begin if a-exp(k*ln (2))<0 then write('0'); if a-exp(k*ln (2))>=0 then begin a:=abs(a-round(exp(k*ln (2)))); write('1'); end; end; writeln; end; readln; end.
Висновок: Я навчився переводити числа з десяткової системи в двійкову. Міністерство освіти і науки україни НУ «Львівська Політехніка» Кафедра інформатики. ЛАБОРАТОРНА РОБОТА №4 ПЕРЕВЕДЕННЯ ЧИСЕЛ В ПОЗИЦІЙНІ СИСТЕМИ ЧИСЛЕННЯ Добуш Назар