Question

определите,что будет выведено в результате выполнения следующей программы.
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.​

Answer 1

Ответ:

s=0

s=-5

s=-5

s=2

s=2

Объяснение:

program nomer2;

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

end.