Varp,v,t,x:integer;
begin
write('Введите число ');
readln(x);
p:=x div 100;
v:=(x div 10) mod 10;
t:=(x mod 100) mod 10;
if (p < v) and (p<t) then
writeln('Минимальное цифра = ',p);
if (v < p) and (v<t) then
writeln('Минимальное цифра = ',v);
if (t < p) and (t<v) then
writeln('Минимальное цифра = ',t);
end.
Переменная Х <span>будет принимать значение 17.</span>
Var a:string;
b,c:integer;
beginwriteln('Привет, как тебя зовут?');
readln(a);
writeln(a, ', cколько тебе лет?');
readln(b);
writeln(a, ', и тебе ', b, 'лет, в каком году ты родился?');
readln(c);
writeln(c, ', хорошо!');
writeln('Мне пора идти, пока ', a, '!');
<span>end.</span>
6) а)408:17=24(10)=11000(2)
б) 2410(8)=10100001000(2)=1288(10); 27(8)=10111(2)=23(10); 1288:23=56(10)=111000(2)=70(8)
в) D4A(16)=110101001010(2)=3402(10); 1B(16)=11011(2)=27(10); 3402:27=126(10)=1111110(2)=7E(16)
Процессор расположен на системной плате (на материнской плате).