Именно эта строка перебирает элементы массива, поэтому правильным ответом будет
<span>А) пересчет массива от 1 до 10;</span>
Program i7;
var
i,n,k: integer;
begin
writeln('vvedi 4etireh znachoe chislo');
readln(n);
k:=1;
while n>0 do
begin
k:=k*n mod 10;
n:=n div 10;
end;
writeln(k);
end.
Ответ: 1,3
с1 получает целое число от деления.
с2 получает остаток от деления.
Потом просто выводятся через пробел.
Автор кто? скажи автора я тебе решу