Переведи число 20238 в десятичную систему счисления.
ответ: 20238= тут две ячейки

1)

var

i,k: integer;

a: array [1..14] of integer;

begin

k: =0;

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

if a[i] mod 2=0 then k: =i;

end;

if k> 0 then

begin

for i: =k to 13 do a[i]: =a[i]+1;

a[14]: =0;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

2)

var

i,k: integer;

a: array [1..14] of integer;

begin

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

end;

for i: =1 to 7 do

begin

k: =a[i];

a[i]: =a[i+7];

a[i+7]: =k;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

а) компьютер, предназначенный для эксплуатации одним пользователем, то есть для личного использования.

б)совокупность программ, процедур и правил, а также документации, относящихся к функционированию системы обработки данных .

в) комплекс и обрабатывающихпрограмм, которые, с одной стороны, выступают как интерфейс между  устройствами вычислительной системы иприкладными программами, а с другой стороны  — предназначены для устройствами, вычислительными процессами, эффективного распределения вычислительных ресурсов между вычислительными процессами и организации надёжных вычислений. это определение применимо к большинству современных операционных систем общего назначения.

г)поименованная последовательность байтов.

д)лицо илиорганизация, которое использует действующую систему для выполнения конкретной функции.

е)разновидность интерфейсов, в котором одна сторона представлена человеком (пользователем), другая  — машиной/устройством. представляет собой совокупность средств и методов, при которых пользователь взаимодействует с различными, чаще всего сложными, машинами, устройствами и аппаратурой.

на паскале:

var

n,s,p: integer;

begin

read(n);

p: =n mod 10;

if p mod 2=0 then writeln ('оканчивается на четную цифру')

                    else writeln ('оканчивается на четную цифру');

while n> 0 do

begin

n: =n div 10;

s: =s+1;

end;

writeln ('количество цифр в числе', s);

end.