Прикрепляю решение повторно, надеюсь у модераторов больше не возникнет вопросов...
Var n,count:longint;
begin read(n);
count:=0;
repeat n:=n div 10;
inc(count);
until n=0;
writeln(count);
<span>end.</span>
Скорее всего в оперативной памяти. Процессор после обратотки информации отправляет её именно туда а позже, когда она уже проработала её можно сохранить в ПЗУ.
Ответ:
239
Объяснение:
первое число в десятичной системе равно 105
второе - 74
третье - 60
сумма равна 239
Составьте программу ввода и вывода массива;3,4,-9,8,1,-6,2,-5,-1,7,5,9.
В ТАБЛО ДАМ ПИЗ Д...
Var a: array[1..50] of Integer;
x,i: integer;
begin
writeln('количество элементов в массиве:');
readln(x);
for i:=1 to x do
begin
readln(a[i]);
end;
for i:=1 to x do
begin
writeln(a[i]);
end;
end.