определить сумму всех чисел кратных 3 из промежутка от 100 до 1000
Polly6644:
через арифметическую прогрессию
а1=102; ближайшее число меньше 1000, которое делится на 3 это 999-проверяем. 999=102+3(n-1); 999-102=3(n-1); 897=3n-3; 900=3n=300; a300=102+3(300-1); a300=102+897; a300=999; S300=((102+999)*300)/2; S300=165150; ответ:165150
в 4 действии 900=3n;n=300
Паскаль?
Ответы
Ответ дал:
0
var sum,i:integer;
begin
sum:=0;
for i:=100 to 999 do
if (i mod 3=0) then sum:=sum+i;
writeln('Сумма трехзначных чисел кратных трем равна ',sum);
end.
begin
sum:=0;
for i:=100 to 999 do
if (i mod 3=0) then sum:=sum+i;
writeln('Сумма трехзначных чисел кратных трем равна ',sum);
end.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
8 лет назад