allonso

22.10.2020 12:43 •  Информатика

Определите,что будет выведено в результате выполнения следующей программы. program nomer 2;
var i,n,s:integer;
const a:array [1...5]of integer=(5;-5;12;7,0)
begin
s:=0
for i:=1 to 5 do
begin
if I mod 2 =0 then s:=s+a[i];
writeln ('s=',s);
end.​