uses crt;
var i,sum,k: integer;
begin
sum:=0;
k:=0;
writeln('<em>Вводите числа. 0 - конец последовательности</em>');
repeat
read(i);
if i mod 2=1 then begin
sum:=sum+i;
inc(k);
end;
until i=0;
writeln;
writeln('<em>Среднее арифметическое нечетных чисел: </em>',sum/k:5:3);
<span>end.</span>
Y=0
INPUT A
INPUT B
FOR X=A TO B
IF X MOD 2 = 0 THEN Y=Y+A
NEXT X
END
<span>Для изменения стандартного форматирования текста на слайдах необходимо эти изменения внести в образец слайдов.
</span>1. При изменении шрифтов и маркеров.
<span>2. Для вставки картинок, которые должны появиться на слайдах презентации. </span>
<span>3. Изменение расположения, размера и формата рамок. </span>