100011(2)=35 (10)
100011(2)=43(8)
100011(2)=23(16)
<span>101001011(2)=513(8)</span>
<span><span>101001011(2)=331(10)</span></span>
<span><span><span>101001011(2)=14B (16)</span></span></span>
Значение s останется = 1, так как цикл не выполнится ни разу
Видовое понятие- подчиненное понятие, входящее в состав др., более общего понятия, которое называется родовым. Так, понятие "человек" - видовое понятие по отношению к понятию "млекопитающее", которое является родовым по отношению к понятию "человек".
Var
ch, mo, di: longint;
otvet, s: string;
begin
readln(ch);
otvet := '';
while ch <> 0 do
begin
di := ch div 8;
mo := ch mod 8;
str(mo, s);
otvet := s + otvet;
ch := di;
end;
writeln(otvet);
end.
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
type
Ex211a=class
public
constructor(fio,phone:string);
begin
var n:=Max(fio.Length,phone.Length);
Writeln((n+2)*'*');
Writeln('*',fio.PadRight(n),'*',NewLine,'*',phone.PadRight(n),'*');
Writeln((n+2)*'*')
end;
end;
type
Ex211b=class
public
constructor;
begin
var n:=ReadInteger('Введите целое число:');
Writeln('Результат равен ',n+10)
end;
end;
begin
new Ex211a('Иван Иванов','7-841-2666666');
new Ex211b
end.
<u>Пример</u>
***************
*Иван Иванов *
*7-841-2666666*
***************
Введите целое число: 18
Результат равен 28