100 баллов! Задача по информатике по теме одномерный массив.
Подсчитать сумму всех НЕЧЁТНЫХ чисел от 101 до 301.
platon1108:
Чисел 101. Но доказать не могу)
Ответы
Ответ дал:
1
Ответ:
1.user crt;
2.var sum ,i: integer;
3.begin
4.sum:=0;
5.for i:=101 to 301 do begin
6.if i mod 2=0 then sum :=sum+i;
7.end:
8.writeln(Сумма нечётных элементов = ,sum);
9.end.
Объяснение:
Ответ дал:
1
Ответ:
1)
var i, summa: integer;
begin
for i:=101 to 301 do
if i mod 2 = 1 then summa:=summa+i;
writeln ('summa = ', summa);
end.
2)
var i, summa: integer;
begin
for i:=101 to 301 do
if odd(i) then inc(summa, i);
writeln ('summa = ', summa);
end.
Вас заинтересует
4 месяца назад
4 месяца назад
11 месяцев назад
11 месяцев назад
2 года назад
7 лет назад