Составьте и запишите две компьютерных программы на языке программирования паскаль для решения следующих : 1. нахождение суммы всех чисел, оканчивающихся на 4 в диапазоне от 30 до 80. 2. нахождение среднего арифметического значения чисел, оканчивающихся на 5 в пределах от 10 до 70.

Var
   S:integer;
   i:integer;
Begin
S:=0;
For i:= 30 to 80 do
    if i mod 10 = 4 then S:=S+i;
WriteLn('S = ',S);
End.

Var
   S,n,i:integer;
Begin
S:=0;
n:=0;
For i:= 10 to 70 do
    if i mod 10 = 5 then
       Begin
       S:=S+i;
       n:=n+1;
       End;
WriteLn('Sr = ',S/n);
End.