Вычислить сумму натуральных чисел,кратных 3,меньшую 100.Паскаль

who dance with tina at the night club?what time does tom arrive at school?when you watch a great film on TV?when Valerie jog in the park?what does your brother studyat university?what did sally visit in london ?

 var i,sum:integer; begin sum:=0; for i:= 1 to 100 do begin if (i mod 3 = 0) and (sum+i<100) then sum:=sum+i; end; writeln(sum); end.

1