Да, как ни странно, образованным человеком в Китае мог считаться только тот, кто умел писать иероглифы не просто грамотно, но и красиво. ))))
C#
int[] array = {1,32,3,25,7,9};//берём массив чисел
int t = 0;//переменная в которую будем прибавлять все эл. массива
int len = array.Length;//длина массива
for(int i = 0;i<len;i++)//цикл для перебора эл. массива (можно foreach роли не меняет)
t+=array[i];//прибавление
Console.WriteLine(t/len);//вывод сред.арифметического
Var
i,s,t,koldney:integer;
begin
writeln('введите количество дней');
readln(koldney);
for i:=1 to koldney do
begin
writeln('введите температуру в ', i, ' день');
readln(t);
if t<0 then
s:=s+1;
end;
writeln('количество дней с температурой ниже 0 = ', s);
readln;
end.
Program one;
Var a:array[1..9999] of rial; i,m,n,k:integer;
Begin
K:=1;
Readln (n);
For i:=1 to n do begin
Readln(a[i]) ;end;
For i:=1 to n do begin
If (a[i]>0) then a[i]:=a[i]*0,4;
If (a[i]=0) then a[i]:=0,5; If (a[i]>0) then k:=k*a[i];
If (a[i])<0) then m:=m+a[i];
End;
Writeln (k,m);
End .
Ну допустим элементы (36, 50, 41, 70, 31, 26, 38) преобразуем и выводим (180, 50, 245, 70, 155, 26, 190)