После выполнения фрагмента программы :
m:=0;
for i:=1 to 10 do
begin
if i mod 3=0 then
a[i]:=2*(i-1) else
a [ i ]:=-1;
m := a [ i ]+ m ;
end ;
Переменная m принимает значение …
23 (pascalabc. net/WDE/)
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
