Запишите команды присваивания, соответсвующие описанию:

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf

program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.

на 1 дереве - 5 

на 2дереве - 7

var x,x1: integer;

s: string;

begin

  read(x);

  s: =str(x);

  x1: =int(s[3]+s[2]+s[1]);

  writeln(x-x1);

end.