найти сумму нечётных чисел, из промежутка от 11 до 99, найти среднее арифметическое чисел от 1 до 50

Question

Информатика

Клементина

22 ноября, 22:41

найти сумму нечётных чисел, из промежутка от 11 до 99, найти среднее арифметическое чисел от 1 до 50

+4

Ответы (1)

Знаете ответ?

Инеска · Answer 1

uses crt;

var s, i:integer;

begin

for i:=11 to 99 do

if a mod 2 0 then s:=s+i;

writeln (s) ;

readln;

end.

2.

uses crt;

var s, i:integer;

begin

for i:=1 to 50 do s:=s+i;

writeln (s/50) ;

readln;

end;