Частина тексту файла (без зображень, графіків і формул):
ЗАВДАННЯ:
перевести натуральні десяткові числа x1, x2, x3 в їх двійкові еквіваленти методом віднімання.
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
НА ТЕМУ «ПЕРЕВЕДЕННЯ ЧИСЕЛ В ПОЗИЦІЙНІ СИСТЕМИ ЧИСЛЕННЯ»
з дисципліни «Інформатика та обчислювальна техніка»
Підготував:
студент
групи РТ-11
Прийняв:
Нестор Н. І.
Львів 2010р.