В середовищі PascalABC створіть програму, яка виводить - вопрос №121094785 от abaltabaeva03 27.12.2020 17:04

Question

Информатика: В середовищі PascalABC створіть програму, яка виводить на екран усі непарні числа від 1 до 100 та обчислює їх суму. Використайте команду циклу з параметром FOR.

abaltabaeva03 · Answer

Код:var    i, sum: integer;beginsum:=0;for i:=1 to 100 do begin      if i mod 2 0 then begin         write(i, );         inc(sum, i);      end;end;writeln;write( Sum = ,sum);end....