смотри описание блок схемы на картинке
1) человек - человек
2) учитель - класс
3) газета - человек
Клавіша Backspase вилучає символ ліворуч від курсору.
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.
А в какой СС (системе счисления) записаны сами числа?