Завантажити програмне середовище
Скретч можна за до значка ​

Прототип/копия/реплика

Это программа каталога брокиловает все сетям ПК

Память оперативная и картографическая

Procedure TForm1.Button1Click(Sender: TObject);
var i,kol,sum:integer; aver:real;
begin
  sum:=0;
  kol:=0;
  for i:=10 to 99 do
     if i mod 13=0
       then
        begin
          sum:=sum+i;
          kol:=kol+1;
        end;
  aver:=sum/kol;
  Label4.Caption:=IntToStr(kol);
  Label5.Caption:=IntToStr(sum);
  Label6.Caption:=FloatToStr(aver);
end;                            

Оформление: