#include <iostream>
#include <cstdlib>
// содержит srand() и rand()
#include <ctime>
using namespace std;
int main()
{
int n=10;
<span> int mas[n] = {};
</span><span> int tmp,j=0;
</span><span> cout<<"random number";
cout<<endl;
</span>// начальная установка генератора случ. чисел
srand(time(NULL));
<span>// заполнение массива случайными числами
</span><span> for (int i = 0; i < n; i++)</span><span>
{
</span><span> mas[i] = rand()/100; cout<<mas[i]<<" ";
</span><span> }</span><span>
cout<<endl;
</span>// перестановка элементов
<span>for (int i = 0; i < n/2; i++)
</span> {<span>
tmp=mas[i];</span><span> mas[i]=mas[2*(i+1)-1];</span><span> j=2*i;
</span> while (j>i)<span>
{</span><span>
mas[j+1]=mas[j];</span><span> j--;
</span><span> }
</span> mas[i+1]=tmp;
<span> }
</span><span>//"массив после замены"
</span><span> for (int i = 0; i < n; i++) </span><span> cout<<mas[i]<<" ";</span><span>
</span><span> cout<<endl;
</span><span> system("pause");
</span><span> return 0;
</span>}
<span>
</span>
11 строка не стоит точка с запятой
var
a,x:integer;
i,s:integer;
begin
write('Введите число ');
readln( a );
x:=a;
s:=0;
while ( x<>0 ) do begin
s := s + (x mod 10);
x := x div 10;
end;
writeln( 'Сумма цифр числа ',a,' = ', s );
if (s mod 2 <>0 ) then
writeln('Верно')
else writeln('Неверно');
end.
DIV - целое.
Mod - остаток от деления.
Судя по коду требуется ввести трехзначное число.
x=700
Ответ: 700