//Скомпилируй этот код и получишь ответ.
program sum;
var i, s: Integer;
begin
for i:=1 to 2019
do if(i mod 3 = 0) then s:= s+i;
writeln(s);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
//Скомпилируй этот код и получишь ответ.
program sum;
var i, s: Integer;
begin
for i:=1 to 2019
do if(i mod 3 = 0) then s:= s+i;
writeln(s);
end.