Сформулируйте правила перевода чисел из системы счисления с основанием р в десятичную систему счисления и обратно: из десятичной системы счисления в систему счисления с основанием s. Приведите примеры.

2^i = n

2^i = 64

i = 6 бит.

ответ. 6 бит

program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.

пусть [a,b] - область и a< =b

var

a,b,x: real;

begin

readln(a,b,x);

if (a< =x) and (x< =b) then

writeln('принадлежит')

else

writeln('не принадлежит');

end.

номер 4, так как две собаки в этой части не допущены.