Написати програму на Турбо Паскаль,для обчислення суми чисел кратних трьом,які не більше 100.

Var s,i:integer;
begin
for i:=3 to 100 do
  if i mod 3=0 then s:=s+i;
write(Сумма: ,s);
readln
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.