Помогите решить простую задачу в паскале - вопрос №257964

Составьте блок-схему и программу для нахождения среднего арифметического всех натуральных нечетных двузначных чисеел

 



Дополнение автора от 23.04.12 17:03:48

Желательно в цикле «Для»

Лучший ответ по мнению автора

program z1;

uses crt;

var S,k,i:integer;

sr:real; 

begin

clrscr;

S:=0; k:=0;

for i:=11 to 99 do

  if i mod 2<>0 then

  begin S:=S+i; k:=k+1 end; 

Sr:=S/k;

writeln('sr=',sr:8:2);

readln

end. 

S — сумма чисел, k — количество. i — числа 

Sr  - среднее арифметическое

i mod 2<>0 проверка не нечетность, остаток от деления на 2 не равно 0 

1

Буду благодарна, если отметите

23.04.12
Лучший ответ по мнению автора

Другие ответы

Имеет значение, какой цикл использовать?

 

23.04.12

Еva

от 100 p.
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store