1) Нам дано что S=0 дальше нам дано что программу s:=s+12 нужно повторить 11 раз ( for k:=1 to 11 do ).К нулю прибавляем 12 ровно 11 раз и получаем S=132
2)так же делаем и тут. обрати внимание что 0 тоже считается за количество повторов ( for k := 0 to 9 do ) так мы считаем не 9 повторов а 10.И так. <span>s := 1 следовательно к 1 прибавляем 5 по 9 рази получаем </span> S=51
Var
i:integer;
a:array[4..9]of integer;
begin
writeln('Исходный массив:');
for i:=4 to 9 do
begin
a[i]:=random(1,10);
write(a[i]:4);
end;
for i:=4 to 9 do
if a[i]<5 then a[i]:=a[i]-1;
writeln;
writeln('Преобразованный массив:');
for i:=4 to 9 do
write(a[i]:4);
<span>end.</span>
Простота и освоения системы
скорость достижения результатов
удовлетворенность при эксплутации