Заданы два числа а и в. первое в системе счисления с основанием р, второе с основанием q. вычислить значение с по указанной формуле и вывести его на экран в десятичной системе счисления и системе счисления с основанием r.(p=3; q=8: c=a^3-2*a+b(паскаль авс)

бег-бог-лог-лаг-шаг

бант-кант-карт-кара-кора-коса

шар-бар-бам-бум-кум-куб

муха-мура-фура-фора-кора-корн-коан-клан-клон-слон

миг-маг-мак-бак-бек-век

var a: array[1..100] of integer;

begin

  randomize; {чтоб рандом был разный для каждого запуска програмы}

  for i: = 1 to 100 do

      if i mod 2 =0 then a[i] : = 2*random(100)+1; {формула нечетного числа}

      else a[i]: =2*random(100);

end.

есличто непонятно - пиши в сообщения, растолкую

var m,n: integer;

begin

  read(n,m);

  if n > m then writeln(m+n, n);

  else writeln(m+n, m);

end.

во второй непонятно как задются эти числа

var i,n: integer;

begin

  read(n);

  for i : = 1 to n do

      writeln(i, i*i);

end.

блок схемы мы не учили да и фигня эти схемы чесно говоря

зеркало, весло, начало, одеяло, масло, крыло, дупло