Где можно купить футболку арсенал лондон @ Я Русский!
помогите,дорогие... что-то голова не варит совсем..найти среднее арифметическое одномерного массива размерностью 7, сформировать новый массив,каждый член которого будет увеличен на значение среднего арифметического, результат вывести тут жеочень прошу...
не такие мы уж и дорогие, коли ИДЕИ подаем бесплатно;))) но только идеи;))type TMas= array[1..7] of real;mas: tMas;......beginsumma:=0;for i:=1 to 7 dosumma:=summa+mas[i];writeln('sredne arifm:',summa/7);srednearifm:=summa/7;for i:=1 to 7 domas2[i]:=mas[i]+srednearifm;for i:=1 to 7 dowriteln(mas2[i]);end.надеюсь переменные ты опишешь сама и ввод массива сделаешь;)).
Хы, спс, мне тож надо было))).
#3Suzumi • AishiteruНЕ ПОНЯЛ ВАС?;)).
а можно всё и целиком,а? ;) я конечно понимаю,что все ленивые...но всё же ;)пытаюсь разобраться...пока нихрена не понимаю,тему пропустила... поэтому попрошу целиком,если можно конечно=).
вы знаете, Алина, что в этой группе я самый злой даватель советов и программ никому не пишу кроме красивых девушек, а за это администрация группы попрекает меня тем что я якобы домогаюсь;))) ШУЧУ;)type TMas= array[1..7] of real;var mas,mas2 : tMas;summa,srednearifm : real;beginfor i:=1 to 7 do read(mas[i]);summa:=0;for i:=1 to 7 dosumma:=summa+mas[i];writeln('sredne arifm:',summa/7);srednearifm:=summa/7;for i:=1 to 7 domas2[i]:=mas[i]+srednearifm;for i:=1 to 7 dowriteln(mas2[i]);readln;end.все осталась отладка- но она за вами...
