Выберите верные утверждения *
2 балла
любой цикл по переменной можно заменить на равносильный цикл с условием
цикл - это однократное повторение действий
в циклическом алгоритме тело цикла повторяется несколько раз
любой цикл с условием можно заменить на цикл по переменной​

program xxx;

var n, c, d, e, k : integer;

begin

  wtite ('введите 3-х значное число n =');

  readln (n);

  c : = n div 100;

  d : = (n div 10) mod 10;

  e : = n mod 10;

  k: = 100*e + 10*d + c;

  if n = k then write ('палиндром') else write('не палиндром')

end.

если есть д ш и в то это не куб а параллелипипед

var 

a,b,c,r: real;

begin

readln(a,b,c,r);

if (2*r< a) and (2*r< b) and  (2*r< c)

then writeln('поместится')

else writeln ('не поместится');

end.

для куба достаточно одного условия (2*r< a) 

s : = 0

for i : = 1 to n do

  if i mod 2 = 1 then

      s : = s - 1/2/n

  else

      s : = s + 1/2/n;

решаем относительно  a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4.