Pascal :
var a,b,c:longint; begin for a:=1 to 100 do if a mod 6=0 then c:=c+a; writeln(c); end.
By signing up a 算道OJ universal account, you can submit code and join discussions in all online judging services provided by us.
Using your 算道OJ universal account
