Память -это психический процесс запечатления , сохранения и воспроизведения чего-либо
Var a:array[1..20] of integer;
i,k:integer;
begin
for i:=1 to 20 do begin
read(a[i]);
if not odd(a[i]) then k+=1;
end;
writeln(k);
<span>end.</span>
Рассмотрим назначение переменных на примере.
Пусть задано число 34561.
Тогда n=34651 (введённое число сохраняется в переменной n). В цикле значение n меняется так: 3465, 346, 34, 3, 0.
Переменная c используется при получении цифр числа, т.е. в этой переменной последовательно будут значения 1, 5, 6, 4, 3.
В переменной mn сохраняется минимальная цифра, стоящая на чётном месте. Значения этой переменной: 9 (начальное значение), 6, 4.
Переменная i используется для определения места (чётное или нечётное) цифры числа. Начальное значение i=0, затем i в цикле увеличивается на 1: 1, 2, 3, 4, 5.
Var a,b,s,i:integer;
begin
s:=1;
read(a,b);
for i:=a to b do
s:=s*i;
writeln(s);
end.