Напишите программу, которая хранит ваше имя, ваш возраст и хобби в трех переменных, затем выводит данную информацию на экран в следующем формате: Menya zovut .

Mne let.

Mne nravitsya для питон

program xxx;   var i, n, max : integer;         s : real;         a : array [1..20] of integer; begin  write ('введите n= ');   readln(n);   for i: =1 to n do      readln (a[i]);   max: = a[1];   for i: =1 to n do      if a[i] > max then max : = a[i];   s: = sqrt(max);   write ('корень из наибольшего эл-та =', s)end.

1*2⁶+1*2⁵+0*2⁴+1*2³+0*2²+1*2¹+1*2⁰=

64+32+8+2+1=107

1*2⁶+0*2⁵+0*2⁴+0*2³+1*2²+1*2¹+0*2⁰=

64+4+2=70

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.