Заполни пропуски в программе.

Вывод на экран кубов чисел от 10 до 5.

var
...:integer;
begin
for n:=... downto...do
writeln (n*n*n);
readln;
end.

var

n:integer;

begin

for n:=10 downto 5 do

writeln (n*n*n);

readln;

end.

Var

m: integer;

begin

for m:=10 downto 5 do

writeln (m*m*m) ;

readln;

end.

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.

пусть х основание системы счисления, тогда:

122х (здесь х должен стоять нижним индексом) = 1*х² + 2*х¹ + 2*х⁰=х²+2х+2 - это десятичная запись исходного числа, значит:

х²+2х+2=65

х²+2х-63=0

д= 4 + 252 = 256

х₁ = (-2-  16)/2 = -9 (не удовлетворяет)

х₂ = (-2 + 16)/2 = 7

ответ. основание системы счисления = 7.