cho s:=o , i:=1 to 10 if i mod 2 =0 then s:=s+i TÍNH GIÁ TRỊ CỦA S

2 câu trả lời

  s:=0;

for i:=1 to 10

  if i mod 2=0 then s:=s+i;

Giá trị của S là: 30

Học tốt!

Uses crt;

var i,s:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

if ( i mod 2=0) then s:=s+i;

writeln(‘tong la’,s);

readln;

end.