Составьте и запишите две компьютерных программы на языке программирования паскаль для решения следующих : 1. нахождение суммы всех чисел, оканчивающихся на 5 в диапазоне от 120 до 300. 2. нахождение среднего арифметического значения чисел, оканчивающихся на 6 в пределах от 15 до 100.

Задача 1.
Var
   A:integer;
   S:real;
Begin
S:=0;
For A:= 120 to 300 do
    S:=S+A;
WriteLn('S = ',S);
End.

Результат работы программы:
S = 38010

Задача 2.
Var S:real;
    n,A:integer;
Begin
n:=0;
S:=0;
For A:= 15 to 100 do
    if A mod 10 = 6 then
       Begin
       S:=S+A;
       n:=n+1
       End;
WriteLn('Sr = ',S,'/',n,' = ',S/n);
End.