Определение среднего арифметического чисел последовательности

@Ярик920 · Регистрация: 28.05.2013

ребят, нужна помощь, не могу решить

magirus · 20.06.2013, 20:30

Комментарий администратора

текстовые задания перепечатываем на форум руками.
читаем правила форума.

@antonboom · 20.06.2013, 22:05

Что решать то??? Вот тебе переписка на Pascal твоего документа:
Определение среднего арифметического чисел последовательности

Pascal

uses crt;
var n,k,i:integer;
    sr,a,s:real;
begin
k:=0; s:=0;
writeln('Ñêîëüêî ÷èñåë â ïîñëåäîâàòåëüíîñòè?');
readln(n);
for i:=1 to n do begin
 write('Ââåäèòå ',i,' ÷èñëî ïîñëåäîâàòåëüíîñòè ');readln(a);
    if a>2 then begin {ïðèìåð óñëîâèÿ}
    s:=s+a;
    inc(k); {k:=k+1}
    end;
end;
if k>0 then
 begin
 sr:= s / k;
 writeln('Ñðåäíåå àðèôìåòè÷åñêîå :',sr)
 end
else
 writeln('×èñåë, óäîâëåòâîðÿþùèõ óñëîâèþ, íåò');
end.

@Ярик920 0 / 0 / 0 Регистрация: 28.05.2013 Сообщений: 11
		1
	Определение среднего арифметического чисел последовательности 20.06.2013, 20:23. Показов 1122. Ответов 2 Метки нет (Все метки) ребят, нужна помощь, не могу решить 0

Опции темы

Определение среднего арифметического чисел последовательности

Решение