Икт. составить программу: z=√|-ax+y| / in |x+y^2|, где y= -a^5x+b*cosx^2+b

программа на паскале:

program xxx;

  var i, n, s : integer;

begin

  write ('введите n =' );

  readln (n);

  s: =0;

  for i: =1 to n do

    s: = s+ sqr(i+1);

  writeln ('сумма =' , s);

  readln

end. 

2^i = n

2^i = 64

i = 6 бит.

ответ. 6 бит

4 клетки вниз и 7 вправо                                                                                                                           

var

i,j,k: integer;

s,p: string;

begin

p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';

readln(s);

k: =0;

for i: =1 to length(s) do

for j: =1 to length(p) do

if s[i]=p[j] then k: =k+1;

writeln(k);

end.